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Research  Initiation  Program  -  1984 


87  -  1  72i 


For  several  years  prior  to  1983,  AFOSR  conducted  a  special  follow-on 
funding  program  for  Sumer  Faculty  Research  Program  (SFRP)  participants;  this 
was  popularly  known  as  the  AFOSR  Minigrant  Progran.  That  program  was 
superceded  in  1983  by  the  Research  Initiation  Program  conducted  by  SCEEE. 

To  compete  for  a  1984  Research  Initiation  Program  award,  SFRP  participants 
must  submit  a  complete  proposal  .and  proposed  budget  either  during  or  promptly 
after  their  SFRP  appointment  periods.  Awards  to  the  1984  participants  may 
extend  through  15  December  1985. 

Each  proposal  was  evaluated  for  technical  excellence,  with  special 
emphasis  on  relevanoe  to  continuation  of  the  SFRP  effort,  as  determined  by  the 
Air  Force  laboratory/center.  The  final  selection  of  awards  was  the 
responsibility  of  AFOSR. 

+ 

The  most  effective  proposals  were  those  which  were  closely  coordinated 
with  the  SFRP  Effort  Fooal  Point  and  which  followed  the  SFRP  effort  with 
proposed  research  having  strong  prospects  for  later  sustained  funding  by  the 
Air  Force  laboratory/ can ter. 

The  maximum  award  under  the  Research  Initiation  Program  is  $12,000  plus 
cost-sharing  up  to  a  matching  total  amount. 

The  mechanics  of  applying  for  a  Research  Initiation  Program  award  are  as 
follows: 

(1) 


(2) 


(3) 


Employing  institutions  were  encouraged  to  cost-share  sinoe  the  program  was 
designed  as  a  research  initiation  prooedure.  Budgets  included,  where 
[  applicable,  Principal  Investigator  time,  graduate  assistant  and  support  effort, 
y  equipment  and  expendable  supplies,  travel  and  per  diem  oosts,  conference  fees, 
Indirect  oosts,  and  computer  charges. 

Volumes  I,  II,  III,  and  IV  of  the  1984  Research  Initiation  Program  Report 
contain  00 pies  of  reports  on  the  89  subcontract  efforts  awarded  under  this 
program. 


Research  Initiation  Program  proposals  of  $12,000  plus  cost-sharing 
were  to  be  submitted  after  August  1,  1984  but  no  later  than 
November  1,  1984. 

Proposals  were  evaluated  and  the  final  award  decision  was  the 
responsibility  of  AFOSR  after  consultation  with  the  Air  Force 
Laboratory/center. 

The  total  available  funding  limited  the  number  of  awards  to 
approximately  half  the  number  of  1984  SFRP  participants. 

Subcontracts  were  negotiated  with  the  employing  institution, 
designating  the  SFRP  participant  as  Principal  Investigator,  with 
the  period  of  award  having  a  start  date  no  earlier  than  September 
1,  1984  and  a  completion  date  no  later  than  December  15,  1985. 
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Research  Initiation  Program  -  1984 


For  several  years  prior  to  1983,  AFOSR  conducted  a  special  follow-on 
funding  program  for  Summer  Faculty  Research  Program  (SFRP)  participants;  this 
was  popularly  known  as  the  AFOSR  Minigrant  Program.  That  program  was 
superceded  in  1983  by  the  Research  Initiation  Program  conducted  by  SCEEE. 

To  compete  for  a  1984  Research  Initiation  Program  award,  SFRP  participants 
must  submit  a  complete  proposal  and  proposed  budget  either  during  or  promptly 
after  their  SFRP  appointment  periods.  Awards  to  the  1984  participants  may 
extend  through  15  December  1985. 

Each  proposal  was  evaluated  for  technical  excellence,  with  special 
emphasis  on  relevance  to  continuation  of  the  SFRP  effort,  as  determined  by  the 
Air  Force  laboratory/ center.  The  final  selection  of  awards  was  the 
responsibility  of  AFOSR. 

The  most  effective  proposals  were  those  which  were  closely  coordinated 
with  the  SFRP  Effort  Focal  Point  and  which  followed  the  SFRP  effort  with 
proposed  research  having  strong  prospects  for  later  sustained  funding  by  the 
Air  Force  laboratory/center. 

The  maximum  award  under  the  Research  Initiation  Program  is  $12,000  plus 
cost-sharing  up  to  a  matching  total  amount. 

The  mechanics  of  applying  for  a  Research  Initiation  Program  award  are  as 
follows: 

(1)  Research  Initiation  Program  proposals  of  $12,000  plus  cost-sharing 
were  to  be  submitted  after  August  1,  1984  but  no  later  than 
November  1,  1984. 

(2)  Proposals  were  evaluated  and  the  final  award  decision  was  the 
responsibility  of  AFOSR  after  consultation  with  the  Air  Force 
Laboratory/ center. 

(3)  The  total  available  funding  limited  the  number  of  awards  to 
approximately  half  the  number  of  1984  SFRP  participants. 

(4)  Subcontracts  were  negotiated  with  the  employing  institution, 
designating  the  SFRP  participant  as  Principal  Investigator,  with 
the  period  of  award  having  a  start  date  no  earlier  than  September 
1,  1984  and  a  completion  date  no  later  than  December  15,  1985. 

Employing  institutions  were  encouraged  to  cost-share  since  the  program  was 
designed  as  a  research  initiation  procedure.  Budgets  included,  where 
applicable,  Principal  Investigator  time,  graduate  assistant  and  support  effort, 
equipment  and  expendable  supplies,  travel  and  per  diem  costs,  conference  fees, 
indirect  costs,  and  computer  charges. 

Volumes  I,  II,  III,  and  IV  of  the  1984  Research  Initiation  Program  Report 
contain  copies  of  reports  on  the  89  subcontract  efforts  awarded  under  this 
program. 
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RESEARCH  REPORTS 

1984  USAF-SCEEE  RESEARCH  INITIATION  PROGRAM 

VOLUME  I 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 

1.  AN  ANALYTICAL  STUDY  OF  TWO-STAGE  Dr.  Robert  W.  Courter 

LIGHT  GAS  GUN  PERFORMANCE 

2.  A  LOW-COST  LOCAL-AREA  NETWORK  for  Dr.  Myron  A.  Calhoun 

DESKTOP  COMPUTERS 

3.  DEVELOPMENT  of  PREDICTION  MODELS  for  Dr.  S.  Deivanayagam 

HUMAN  TORQUE  STRENGTH 

4.  THE  ROLE  of  ANTIOXIDANT  NUTRIENTS  in  Dr.  William  L.  Stone 

PREVENTING  HYPERBARIC  OXYGEN  DAMAGE  to 

the  RETINA 

5.  THE  INFULUENCE  of  MELTING  and  REACTANT  Dr.  John  W.  Sheldon 
COMSUMPTION  on  TEMPERATURE  TRANSIENTS  in 

SPHERICAL  and  CYLINDRICAL  CHARGES  of  EAK 

6.  GEOSTROPHIC  ADJUSTMENT  in  a  THREE-  Dr.  Keith  L.  Seitter 

DIMENSIONAL  MESOSCALE  NUMERICAL  MODEL  of 

the  AIMOSPHERE 

7.  Report  not  received  on  time.  Will  be  Dr.  William  Czelen 

provided  when  available. 


8.  EFFECTS  of  TEMPERATURE  and  REACTANT  Dr.  Peter  M.  Hierl 

SOLVATION  UPON  the  RATES  of  GAS-PHASE 

ION-MOLECULE  REACTIONS 

9.  EFFECTS  of  NUCLEAR  RADIATION  on  the  Dr.  Hermman  Donnert 

OPTICAL  CHARACTERISTICS  of  LASER  COMPONENTS 

10.  A  REVIEW  of  COMPUTER  SIMULATIONS  for  Dr.  George  R.  Doyle,  Jr. 

AIRCRAFT-SURFACE  DYNAMICS 

11.  CCMPUTATIN  OF  TRANSONIC  PROJECTILE  Dr.  Chen-Chi  Hsu 

AERODYNAMICS 

12.  DEVELOPMENT  of  an  ADAPTIVE  GRID  Dr.  Chris  Reed 

GENERATION  TECHNIQUE  for  TRANSONIC 

PROJECTILE  BASE  FLOW  PROBLEMS 


1 3-  Report  not  received  on  time.  Will  be 
provided  when  available. 


Dr.  Kendall  Nygard 
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VOLUME  II 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 


26.  ; 

ALTERNATIVE  COMPUTATIONAL  METHODS  for 
SEPARATED  FLOWS  about  PITCHED  FLAT 

SURFACES 

Dr.  Larry  A.  Glasgow 

27. 

NO  TITLE 

Dr.  Hendrik  F.  Hameka 

28.^ 

FUNCTIONAL  ROLE  of  SEROTONIN  in  the 
CEREBELLAR  GLOMERULAR  SYNAPSE 

Dr.  Deborah  Armstrong 

29.' 

CHOLINE  and  ETHANOLAMINE  PHOSPHOTRANS¬ 
FERASE  ACTIVITIES  in  GLOMERULAR  PARTICLES 
ISOLATED  FROM  BOVINE  CEREBELLAR  CORTEX 

Dr.  Robert  V.  Doraan 

30.  J 

DYNAMICS  OF  LARGE  SCALE  VORTEX  STRUCTURES 
and  QUASI-LARGE  SCALE  STRUCTURES  in  the 
WAKE  of  a  SPLITTER  PLATE 

Dr.  Paul  H.  Chiu 

31. 

FLOW  PHYSICS  THROUGH  A  PIERCED  MEMBRANE , 

Dr.  Louis  C.  Chow 

32. 

COMPUTATIONAL  STUDIES  of  RAMJET  COMBUSTOR 
FLOW  FIELDS 

Dr.  K.M.  Isaac 

33. 

FREE  STREAM  TURBULENCE  EFFECTS  on 

TURBULENT  HEAT  and  MOMENTUM  TRANSFER 

Dr.  Paavo  Sepri 

34.  ’ 

STUDY  of  COLD  REACTING  and  COMBUSTING 

FLOWS  AROUND  BLUFF- BODY  COMBUSTORS 

Dr.  Richard  S.  Tankin 

35. 

NUMERICAL  MODELING  of  MULTIPHASE 

TURBULENT  RECIRCULATING  FLOWS  in 
SUDDEN-EXPANSION  RAMJET  GEOMETRY 

Dr.  Albert  Tong 

36. 

SiC  FIBER  REINFORCED  GL ASS-CERAMIC 
COMPOSITES  in  the  ZIRCONI A/MAGNESIUM 
ALUMINOSILICATE  SYSTEM  , 

Dr.  Charles  H.  Drummond 

Volume  III 

37. 

ARYLOXY  SUBSTITUTED  PYROMELLITIC 
DIANHYDRIDES 

Dr.  William  F.  Feld 

38. 

ANGLE  RESOLVED  ION-SCATTERING  STUDY 
of  GaAs  SURFACES  the  EXPERIMENT  DESIGN 

Dr.  Thomas  P.  Graham 

RESEARCH  REPORTS 

1984  USAF-SCEEE  RESEARCH  INITIATION  PROGRAM 

VOLUME  I 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 

14.  USE  of  BAYESIAN  DECISION  THEORY  in  Dr.  Stephan  J.  Nix 

ASSESSING  the  POTABILITY  of  GROUND 

WATER  BASED  DRINKING  WATER  SUPPLIES 

15.  DESIGN  of  a  DIGITAL  EW  PASSIVE  Dr.  William  S.  McCormick 

RECEIVER 

16.  DUAL  CHANNEL  FFT  SYSTEM  ANALYSIS  Dr.  Paul  B.  Griesacker 

FACILITY  for  EVALUATING  INTEGRATED 

COMMUNICATION  SYSTEMS 

17.  FAR-INFRARED  ABSORPTION  PROFILES  for  Dr.  Ronald  L.  Greene 

DISTRIBUTED  SHALLOW  DONORS  in  GaAs-GaAlAs 
HETEROSTRUCTURES 

18.  EFFECT  of  POLE  PIECES  on  the  AXIAL  Dr.  James  D.  Patterson 

MAGNETIC  FIELD  in  TRAVELING  WAVE  TUBES 

19.  ENHANCING  MPC-DSS  to  INCLUDE  AUTOMATIC  Dr.  Philip  S.  Chong 
RESCHEDULING  and  ADAPTIVE  PERFORMANCE 

MEASURES 

Volume  II 

20.  PARAMETRIC  STABILITY  in  COST  ESTIMATING  Dr.  Thomas  R.  Gulledge,  Jr. 
MODELS 


21.  ANALYSIS  of  AIR  FORCE  VEHICLE  CONDITION  Dr.  Bruce  N.  Janson 
RATINGS  FROM  HISTORICAL  DATA 

22.  THE  DEVELOPMENT  of  COMPUTATIONAL  Dr.  Harold  C.  Sorensen 

EFFICIENCIES  in  CONTINUUM  FINITE  ELEMENT 

CODES  USING  MATRIX  DIFFERENCE  EQUATIONS 

23.  CENTRIFUGE  MODEL  STUDY  and  FINITE  ELEMENT  Dr.  Yong  S.  Kim 
ANALYSIS  OF  BURIED  CONCRETE  BOX  CULVERTS 

24.  EFFECTS  of  FLUID  SHIFTS  and  HYPOVOLEMIA  Dr.  William  G.  Squires 
in  INDIVIDUALS  with  DIFFERENT  WORKING 

CAPACITIES  WHILE  RESTING  at  a  FIVE  DEGREE 
DECLINATION 

25.  STRUCTURE  OF  MOLTEN  IMIDAZOLIUM  CHLORIDE  Dr.  R.D.  Murphy 


RESEARCH  REPORTS 

1984  USAF-SCEEE  RESEARCH  INITIATION  PROGRAM 

VOLUME  III 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 

39.  THERMAL  DECOMPOSTITION  STUDIES  of  SOME  Dr.  Vi  jay  K.  Gupta 
SILAHYDROCARBONS 

40.  SILANE- TREATED  SILICA  FILLERS  for  Dr.  Larry  M.  Ludwick 

USE  in  FULRORSILICONE  ELASTOMERS 

41.  RAMAN  SPECTROSCOPIC  STUDIES  in  EXTRINSIC  Dr.  James  Schneider 
P-TYPE  SILICON 

42.  GRAIN  SIZE  CONTROL  in  META  STABLE  BETA  Dr.  Isaac  Weiss 
TITANIUM  ALLOYS 

43.  THE  IMPACT  of  EXPERT  SYSTEMS  on  PERFORM-  Dr.  Sallie  E.  Gordon 
ANCE  and  COGNITIVE  STRATEGIES  in  DIAGNOSTIC 

INFERENCE 

44.  EFFECTS  of  ENRICHING  a  COMPUTER-INSTRUCTED  Dr.  Krystine  B.  Yaworsky 
PROCEDURALIZED  TASK  with  EXPLANATORY 

INFORMATION 

45.  SPECIFICATION  SEARCHES  in  COVARIANCE  Dr.  Robert  MacCallum 

STRUCTURE  MODELING 

46.  A  COMPUTATIONAL  MODEL  of  the  HUMAN  Dr.  David  Reynolds 

CARDIOPULMONARY  SYSTEM 

47.  DEVELOPMENT  of  an  OPTIMAL  TESTING  Dr.  Robert  E.  Schlegel 

PROTOCOL  for  the  USAF  CRITERION  TASK 

SET  (CTS) 

48.  CONSTRUCTION  of  CONCEPT-ATOMS  Dr.  Yin-Min  Wei 

49.  DEVELOPMENT  of  a  HIGH-FREQUENCY  LUNG  Dr.  Mukul  R.  Banerjee 

VENTILATION  MODEL  for  TESTING  UNDER 

HYPOBARIC  CONDITIONS 

50.  BRILLOUIN  SPECTROSCOPY  in  SYSTEMS  of  Dr.  Raj  M.  Krishnan 

BIOLOGICAL  SIGNIFICANCE 

51.  STABILIZATION  of  MODE-LOCKED  LASERS  Dr.  Odis  P.  McDuff 

52.  RAMAN  SPECTROSCOPY  of  CAROTENOIDS  and  Dr.  James  J.  Mrotek 

OTHER  MOLECULES  in  UNSTIMULATED  and 

STIMULATED,  CULTURED  Y-1  MOUSE  ADRENAL 
TUMOR  CELLS 
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VOLUME  III 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 


53-  MILITARY  FAMILY  STRESS  and  JOB  Dr.  Lena  Wright  Myers 

PERFORMANCE 

54.  Report  not  received  on  time.  Will  be  Dr.  Walter  Salter 

provided  when  available 

55.  Report  not  received  on  time.  Will  be  Dr.  William  Thomas 

provided  when  available 


56.  EVALUATION  and  VALIDATION  of  ADA  Dr.  Mike  Burlakoff 

PROGRAMMING  SUPPORT  ENVIRONMENTS 

57.  KINETICS  of  HOMOGENEOUS  GAS  PHASE  Dr.  Datta  V.  Naik 

OXIDATION  of  HYDRAZINE  in  AIR 

58.  SOFTWARE  CORRECTIONS  and  EXTENSIONS  for  Dr.  Arthur  M.  Sterling 
an  INTEGRATED  PARTICLE  SIZING  SYSTEM 


Volume  IV 


59-  PREDICTING  GASEOUS  PHASE  ADSORPTION  of  Dr.  Martin  D.  Werner 
ORGANIC  VAPORS  by  MICROPOROUS  ADSORBENTS 


60.  NO  TITLE  Dr.  Frank  P. Colby,  Jr. 

61.  SOLAR  HARD  X-RAY  BURSTS  and  TYPE-II  Dr.  Gabriel  Kojoian 

RADIO  EMISSIONS 

62.  THE  PASSIVE  MODE  LOCKING  of  an  Nd3+:  Dr.  Nabil  M.  Lawandy 

YAG  LASER  WITH  a  TWO-PHOTON  ABSORBER 


63.  PLASMA  GENERATION  and  DIAGNOSTICS  for  Dr.  Bernard  McIntyre 

IONOSPHERIC  PLASMA  SIMULATION 


64.  STUDY  of  UNIFIED  COMPLEX  SUSCEPTIBILITY  Dr.  Ken  Tomiyama 
OVER  MILLIMETER  and  INFRARED  REGIONS  VIA 
KRAMERS-KRONIG  RELATIONSHIP 


65.  DETERMINATION  of  PROFESSIONAL  LITERATURE  Dr.  L.W.  Buckalew 
RESOURCES  RELATING  to  USAF  FAMILY  and  LIFE 
STYLE  ATTRIBUTES  AND  ATTITUDES:  SUPPORT  for 
INTERPRETING  AFSS  DATA 
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1984  USAF-SCEEE  RESEARCH  INITIATION  PROGRAM 

VOLUME  IV 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 

66.  DIFFERENT  CAREER  STAGES:  DIFFERENT  Dr.  Jan  Leeman  Brooks 

DEGREES  of  COMMITMENT 

67.  A  MULTILEVEL  EXAMINATION  of  LEADER-  Dr.  Kevin  W.  Mossholder 

SHIP  EFFECTS  WITH  THE  ORGANIZATIONAL 

ASSESSMENT  PACKAGE 

68.  FUSE  and  SURFACE  TRACKING  SWITCH  Dr.  R.  Gerald  Colclaser 

MODELS  for  the  SHIVA  STAR  INDUCTIVE 

PULSE  COMPRESSION  SYSTEM 

69.  MODELING  the  THERMAL  LAYER  Dr.  Arthur  A.  Kovitz 

70.  DIGITAL  INTERPOLATION  BASED  on  Dr.  Aldy  T.  Fam 

FUNCTIONAL  ITERATION 

71.  Report  not  received  on  time.  Will  be  Dr.  Brian  Holmes 

provided  when  available. 

72.  NUMERICAL  CHARACTERIZATION  of  Dr.  Robert  W.  Jackson 

MICROSTRIP  DISCONTINUITIES  on  THICK 

SUBSTRATES 

73.  A  SUBOPTIMUM  EXTRAPOLATOR  for  IMPROVED  Dr.  Lonnie  C.  Ludeman 
SPECTRAL  ESTIMATION 

74.  HANDLING  FACTS  with  NON-CONSTANT  GROUND  Dr.  John  T.  Minor 
TERMS  in  a  KNOWLEDGE-BASED  SYSTEM 

75.  STRUCTURAL  MODIFICATION  to  ENHANCE  the  Dr.  Franklin  E.  Eastep 
ACTIVE  VIBRATION  CONTROL  of  LARGE  SPACE 

STRUCTURES 

76.  CONSISTENT  SHEAR  LAG  MODELING  of  DAMAGE  Dr.  Walter  F.  Jones 
in  UNIDIRECTONAL  COMPOSITE  LAMINATES 

77.  NUMERICAL  SIMULATION  of  a  SUPERSONIC  Dr.  Meng-Sing  Liou 

INLET  FLOW 

78.  RECONFIGURATION  of  FLIGHT  CONTROL  Dr.  Kuldip  S.  Rattan 

SYSTEM  of  UNMANNED  RESEARCH  VEHICLE 


79.  ANALYSIS  of  ARMOR  BRACKETRY 


Dr.  Hanen  Ray 


RESEARCH  REPORTS 
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VOLUME  IV 

REPORT  NO.  TITLE  RESEARCH  ASSOCIATE 

80.  ESTIMATING  SPEED  of  MENTAL  ROTAION  Dr.  David  F.  Lohman 

THROUGH  ITEM  PACING 

31.  DEVELOPMENT  and  IMPLEMENTATION  of  Dr.  Robert  Vance 

COST-EFFECTIVENESS  and  UTILITY  METHOD¬ 
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ABSTRACT 


The  purpose  of  this  research  was  twofold.  The  first  part  involved 
extending  a  previous  cost  model  for  the  C141  program  to  include  the  F4 
program.  The  second  part  involved  checking  parameter  stability  across 
programs.  If  key  parameters  are  stable,  then  the  model  can  be  used  to 
predict  across  programs  using  the  methodology  suggested  in  [21]  and  [22]. 
This  research  suggests  that  the  key  parameters  are  stable  across  programs 


INTRODUCTION 


In  recent  years,  there  has  been  an  Increased  interest  in  researching 
the  made-to-order  production  situation.  Made-to-order  production  is  charac¬ 
terized  by  a  contractual  agreement  that  specifies  the  number  of  units  to  be 
produced  in  a  fixed  time  horizon.  Many  early  researchers  examined  this 
situation  [1,2,3,11,14,15,17,18,19],  but  they  did  not  present  definitive 
functional  forms  that  were  suitable  for  application.  The  first  truly 
applicable  planning  models  have  only  appeared  recently  [7,8,20,21,22,23,24, 
25].  In  particular,  the  model  presented  by  Womer  and  Gulledge  conforms  with 
economic  theory,  conforms  with  actual  cost  behavior  on  made-to-order 
programs,  and  the  parameters  may  be  estimated  from  available  cost  data. 

This  model  was  developed  under  the  support  of  the  Air  Force  Business 
Research  Management  Center  [22],  and  is  currently  available  on  the  COPPER 
IMPACT  computer  network.  A  description  of  the  model  is  included  in  Appendix 
A.  The  rationale  for  this  type  of  model  is  simple.  Figure  1  delineates  two 
approaches  for  estimating  the  total  price  of  an  aircraft  in  a  given  program. 
The  usual  approach  allocates  overhead  in  the  plant  based  on  direct  labor 
estimates.  Since  only  a  part  of  overhead  costs  are  fixed,  a  more  realistic 
allocation  scheme  involves  separating  total  cost  into  fixed  and  variable 
cost,  modeling  the  variable  cost,  and  then  distributing  the  fixed  cost  to 
the  production  units.  This  methodology  is  advocated  by  Balut  [6],  In 
either  case,  in  the  absence  of  current  contractor  data,  some  method  is 
needed  to  model  the  direct  or  variable  cost  profiles  so  that  DoD  planners 
can  analyze  many  programs  simultaneously  for  various  procurement  quantities. 
The  model  that  is  analyzed  in  this  research  can  be  used  to  generate  either 
direct  or  variable  cost  profiles. 

However,  model  implementation  often  Involves  analyzing  programs  for 
which  data  is  scarce,  so  the  question  that  is  addressed  in  this  research 
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concerns  Che  application  of  an  existing  model  to  new  programs.  Of  course 
some  quantities  are  inherently  different  across  programs;  e.g.,  no  one 
expects  an  F4  aircraft  to  cost  the  same  as  a  C141  aircraft.  These  problems 
can  be  handled  by  rescaling  the  model  as  presented  in  [22].  Learning  curve 
estimates  are  needed  for  the  model,  but  these  are  often  also  available  by 
analogy  with  similar  programs.  The  crucial  estimate  is  probably  the  factor 
returns  parameter.  Very  little  is  known  about  its  true  value  since  we  have 
limited  experience  in  estimating  this  parameter.  This  research  examines,  in 
particular,  the  stability  of  this  parameter. 

During  the  summer  of  1984,  Gulledge  and  Harmon  initiated  research  where 
the  Womer  and  Gulledge  model  was  applied  to  the  A  and  B  models  of  the  F4 
program.  The  results  of  this  research  are  promising.  It  appears  that  the 
parameters  for  the  F4  program  are  surprisingly  similar  to  those  for  the  C141 
program.  However,  because  of  time  limitations  the  equality  hypothesis  was 
not  formally  tested.  This  research  is  documented  in  Harmon's  final  report 
to  the  Air  Force  Office  of  Scientific  Research,  and  it  was  published  as  his 
Masters  Thesis  at  the  University  of  Cincinnati.  This  work  extends  that 
research. 


THE  MODEL 


The  model  that  is  used  in  the  analysis  that  follows  is  a  modification 
of  the  model  in  Appendix  A.  It  is  based  on  the  belief  that  model  specifica¬ 
tion  should  be  based  on  economic  theory.  That  is,  in  lieu  of  empirical 
specification,  a  behavioral  assumption  is  stated,  a  theoretical  model  is 
specified,  and  an  estimable  cost  function  is  derived.  Consider  the  following 
definitions: 
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C  -  discounted  program  cost  measured  in  units  of  the  variable 

composite  resource, 

1  -  the  sequence  number  of  an  airframe, 

*  discounted  variable  cost  cf  a  single  airframe, 

n  *  the  total  number  of  airframes  in  the  production  program, 

T,.  "  the  delivery  date  for  airframe  i, 

01 

V  «  the  average  number  of  airframes  in  the  production  process  in 

the  facility  at  time  t, 

t  ^  *  the  date  work  begins  on  airframe  i;  work  on  all  airframes  in 

the  same  lot  is  assumed  to  begin  at  the  lot  release  date, 

q^(t)  ■  production  rate  at  time  t  on  airframe  i, 

Q^(t)  »  cumulative  production  on  airframe  i  at  time  t, 

x^(t)  «  rate  of  resource  use  at  time  t  on  airframe  i, 

6  -  a  parameter  describing  learning  prior  to  airframe  i, 

e  «  a  parameter  describing  learning  on  airframe  i, 

y  ■  a  parameter  describing  returns  to  the  variable  resources, 

a  -  a  parameter  associated  with  decreases  in  labor  productivity 

as  an  airframe  nears  completion, 
v  -a  parameter  describing  returns  to  the  length  of  the 

production  line, 
o  ■  the  discount  rate, 

A  »  a  constant. 

The  production  function  is  assumed  to  be  of  the  following  form: 

qt(t)  -  A(l-l5){Q1E(t)(t<J1-t)ax1/Y(t)VV.  (1) 

The  following  parametric  assumptions  are  made: 

OSaSl,  OScSl,  0  S  6  S  1 ,  v<0,  Y>1. 
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Navy,  U.S.  Air  Force,  and  U.S.  Marine  Corps.  The  Phantom  was  also  placed  in 
service  with  the  Royal  Navy,  Royal  Air  Force,  Royal  Australian  Air  Force, 
the  Imperial  Iranian  Air  Force,  the  Republic  of  Korea  Air  Force,  the  Israeli 
Air  Force,  and  the  Federal  German  Luftwaffe.  This  application  examines  only 
the  first  10  production  job  orders  of  F4A's,  F4B's,  and  F4C's  all  of  which 
were  placed  in  service  by  the  U.S.  armed  forces.  These  aircraft  were 
produced  in  the  late  1950's  and  the  early  1960's.  In  total,  791  aircraft 
were  analyzed. 

The  F4  program  cost  history  [13]  contains  data  on  primary  manufacturing 
labor  hours  on  blocks  of  airframes  within  job  orders  within  contracts.  In 
Harmon's  analysis,  this  data  was  organized  by  individual  blocks  of  air¬ 
frames.  The  result  was  617  observations  for  estimation.  Since  some  of  the 


data  is  reported  as  common  hours  for  airplanes  in  multiple  blocks,  it  is 
necessary  to  assign  some  hours  to  the  blocks  using  somewhat  arbitrary 
weighting  schemes.  For  this  reason,  in  this  application  the  data  is  orga¬ 
nized  by  job  order. 

The  data  analysis  problems  at  this  stage  of  the  analysis  were  formidable 
Actual  delivery  schedules  were  not  available,  so  actual  acceptance  schedules 
were  used.  For  all  job  orders  there  were  small  quantities  of  labor  hours 
that  were  allocated  to  the  lot  after  the  schedule  indicated  that  all  air¬ 
craft  had  been  accepted.  These  were  extremely  small  quantities,  but  still 
they  were  redistributed  evenly  over  all  production  periods.  Also,  for  the 
first  two  job  orders  there  was  a  27  month  period  for  which  McDonnell  Air¬ 
craft  Company  did  not  report  direct  manufacturing  hours.  The  model  was 
still  initialized  at  t"0,  but  the  first  observation  for  the  estimation  does 
not  occur  until  time  period  27. 
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Job  order  720  of  contract  62-0383  presented  special  problems.  This  job 
order  contained  147  F4-B  aircraft.  The  acceptance  schedule  separated  these 
aircraft  into  two  groups,  29  and  118  aircraft.  The  data  on  labor  hours  was 
separated  into  two  groups  in  the  program  cost  history,  but  an  examination  of 
the  data  suggested  problems  associated  with  the  allocation  to  the  29  air¬ 
craft.  It  appeared  that  too  many  hours  were  allocated  to  the  29  aircraft, 
and  there  was  one  observation  that  was  an  obvious  copy  and/or  accounting 
error.  Therefore  the  model  was  estimated  using  several  data  configurations. 

The  model  was  estimated  with  the  29  and  118  aircraft  reported  separately, 
and  with  both  the  outlier  included  and  excluded.  The  analysis  was  repeated 
with  the  two  groups  of  aircraft  combined.  By  separating  the  data  the  number 
of  observations  was  increased,  but  the  decision  was  still  made  to  combine 
the  observations  and  estimate  the  job  order  as  a  complete  group  of  observa¬ 
tions.  After  all  data  adjustments,  the  data  set  contained  236  observations 
on  791  aircraft.  The  decision  was  also  made  to  leave  the  extreme  observa¬ 
tion  in  the  data  set.  This  is  discussed  in  a  later  section  of  the  report. 


ANALYSIS 

Since  the  C141  program  was  selected  as  the  standard  of  comparison,  it 
seemed  pertinent  to  reexamine  that  program.  One  of  the  problems  noted  in 
that  estimation  was  that  the  discount  rate  was  apparently  not  statistically 
different  from  zero  [ 22  ,p.  121-122  ] .  After  extensive  simulations,  it  was 
resolved  that  the  nonsignificance  was  false;  i.e.,  an  artifact  of  the 
estimation  procedure.  The  problem  was  caused  by  a  high  correlation  between 
the  o  and  y  estimates.  Therefore,  p  was  fixed  at  its  estimated  value  and 
the  parameters  were  reestimated.  The  results  of  this  estimation  are  pre¬ 


sented  in  Table  1 . 


Table  1 


Parameter  Estimates  and  Asymptotic  Standard  Errors 


Parameter 


Estimate 


Standard  Error 


5 
8 

6 


0 

1 


Y 

v 


1.1460 

3.0490 

0.4848 

1.0016 

-0.4408 


.67300 

.4545 

.06550 

.000298 

.160750 


These  estimates  are  in  close  agreement  with  those  presented  in  [22].  These 


estimates  will  be  the  standard  of  comparison  for  the  F4  estimates. 


The  first  F4  estimates  were  made  without  any  consideration  of  the 
differences  in  the  three  different  aircraft  models  included  in  the  analysis. 
The  results  of  this  estimation  are  presented  in  Table  2. 


Table  2 

Parameter  Estimates  and  Asymptotic  Standard  Errors 


Parameter 

Estimate 

Standard  Error 

eo 

11.0300 

1.4100 

nu 

«l 

4.1730 

0.5045 

0.3169 

0.0432 

Y 

1.0032 

0.0004 

V 

0.2131 

0.0494 

These  estimates  agree  with  expectations  with  the  exception  of  the  estimate 
for  v.  Our  expectations  were  that  our  hypothesis  about  the  production  cost 
driver  with  respect  to  the  average  number  of  units  in  the  plant  was  probably 
weak  theoretically,  and  therefore  could  be  difficult  to  verify  empirically. 
However,  a  significant  positive  coefficient  was  not  expected.  Our  suspicion 
is  that  the  positive  sign  follows  from  not  considering  the  model  differences 
in  the  791  aircraft. 
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To  investigate  this  hypothesis  it  was  necessary  to  devise  a  methodology 


to  capture  the  differences  in  the  models.  Intuition  suggests  that  there 
should  be  a  difference  in  cost,  and  this  difference  should  scale  the  cost 
function  up  or  down.  The  first  thing  that  comes  to  mind  is  dummy  variable 
regression,  but  this  concept  is  not  clearly  defined  in  nonlinear  regression 
for  a  model  that  does  not  have  an  additive  intervention  effect.  Since  the 
cost  function  is  shifted  in  scale  by  the  model  changes,  the  obvious  parameter 
to  alter  is  the  scale  parameter,  8^.  FORTRAN  code  was  written  to  incorporate 
a  different  scaling  factor  for  each  production  model  of  the  F4  (The  complete 
code  with  the  data  is  included  in  Appendix  B).  The  results  of  the  estima¬ 
tion  with  the  different  scaling  factors  are  presented  in  Table  3. 
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error  variance  for  the  estimation  presented  in  Table  2  was  .7773  while  that 
for  Table  3  was  .6594. 


PREDICTABILITY  AND  RESIDUAL  ANALYSIS 

Since  the  seven  parameter  model  seems  more  appropriate,  all  the  analysis 
that  follows  concerns  only  that  model.  A  plot  of  the  predicted  versus  the 
actual  values  is  presented  in  Figure  2  (the  solid  line  is  the  predicted). 

This  plot  has  several  characteristics  that  should  be  discussed.  First, 
there  is  the  obvious  outlier  that  was  noted  earlier  in  the  report.  The 
model  was  estimated  two  ways: 

1.  outlier  in  the  data, 

2.  outlier  corrected. 

Surprisingly,  the  outlier  had  very  little  impact  on  the  values  of  the 
estimates.  Since  no  real  reason  could  be  assigned  to  the  occurrence  of  the 
observation,  and  since  the  observation  had  negligible  impact,  it  was  left  in 
the  data. 

The  second  characteristic  concerns  the  way  the  model  predicts  low  in 
the  early  time  periods.  The  figure  is  misleading  in  that  it  visually 
assigns  equal  weight  to  the  early  and  latter  periods.  In  fact,  the  early 
time  periods  represent  a  very  small  number  of  aircraft  relative  to  the 
latter  time  periods.  In  any  case,  the  model  suggested  that  labor  hours  be 
reduced,  but  McDonnell  Aircraft  Company  correctly  chose  not  to  reduce  its 
work  force.  A  shortcoming  of  this  model  is  that  it  does  not  include  hiring 
and  firing  penalties.  This  is  certainly  an  area  where  the  research  needs  to 
be  extended. 

The  original  plan  was  to  analyze  the  residuals  using  the  methodology 
presented  in  [5];  i.e.,  analyze  the  projected  residuals.  For  several 
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reasons,  ordinary  residual  analysis  techniques  were  used.  The  first  reason 
is  related  to  an  analytical  problem,  and  the  second  concerns  practicality. 

The  analytical  problem  is  that  the  projected  residuals  require  the  second 
derivative  of  the  sum  of  squares  function.  In  this  case  that  would  be  the 
second  derivative  of  a  function  that  contains  incomplete  gamma  functions. 

Of  course,  the  derivatives  could  be  obtained  numerically,  but  the  program¬ 
ming  effort  could  not  be  justified  in  the  short  research  period.  The 
decision  to  use  ordinary  residual  analysis  was  reenforced  by  Cook  and  Tsai's 
observation:  "further  investigation  may  be  needed  to  determine  the  best 
approach  in  nonlinear  regression,  but  it  does  appear  that  the  alternative 
types  of  residuals  will  all  suffer  from  the  same  shortcomings  as  the  ordinary 
residuals  [5,  p.9]." 

The  ordinary  residual  analysis  was  straightforward,  and  the  results  are 
predictable  from  Figure  3.  The  long  string  of  positive  residuals  associated 
with  the  underprediction  is  clearly  discernible  in  Figure  3.  With  the 
outlier  excluded,  the  latter  residuals  pass  the  usual  randomness  tests,  even 
though  there  is  one  short  period  of  time  late  in  the  program  where  the  model 
predicts  high.  All  other  things  considered,  one  would  have  to  be  satisfied 
with  this  model's  fit  given  the  nature  of  the  data.  That  is,  this  data  was 
not  generated  within  the  context  of  an  experimental  design;  it  is  actual 
accounting  data. 


COMPARISON  WITH  THE  CI41  MODEL 

In  examining  the  data  in  Tables  1  and  2,  it  is  obvious  that  it  makes  no 
sense  to  compare  the  scale  parameters;  8q,  Bq^,  6 Q2 »  ®03*  In  ^act  these 
parameters  are  expected  a  priori  to  be  different.  The  learning  parameter, 

6,  appears  to  be  different  in  both  models,  but  the  scale  parameter,  y, 
appears'  to  be  very  close  across  models.  However,  this  visual  analysis  is 


misleading.  If  the  method  of  Ratkovsky  [16,  chapter  7]  is  used  to  compare 
parameters  across  models,  neither  the  y  nor  6  estimates  are  significantly 
different.  The  result  with  the  learning  parameter  is  surprising,  but  the 
result  with  the  scale  parameter  agrees  with  our  earlier  research.  At  this 
time,  no  logical  reason  can  be  assigned  to  the  statistical  equivalence  of 
the  learning  parameters.  This  is  another  area  where  additional  research  is 
desperately  needed. 


CONCLUSIONS 

The  promised  deliverables  of  this  research  project  are  summarized 
be  low : 

1.  extend  the  Womer  and  Gulledge  model  to  include  the  F4  airframe 
program, 

2.  design  a  methodology  for  including  model  changes  within  the  model, 

3.  subject  the  model  to  extensive  diagnostic  checking, 

4.  test  for  parametric  stability  across  the  F4  and  C141  programs. 

All  of  the  above  items  have  been  addressed  favorably  in  the  research  project 
The  positiveness  of  this  application  reaffirms  our  commitment  to  our  current 
research  project.  Balut,  Womer,  and  Gulledge  are  currently  incorporating 
this  model  within  a  more  comprehensive  model  for  repricing  aircraft.  This 
model  will  be  used  to  model  variable  program  costs  while  other  methods  will 
be  used  to  distribute  in-plant  fixed  cost.  The  proposed  model  will  be  a 
direct  competitor  with  the  present  multiple  regression  models  that  are  being 
used  by  the  Air  Force  and  the  Navy. 

As  a  final  note,  the  principal  investigator  offered  to  work  with 
Aeronautical  Systems  Division  Personnel  in  the  implementation  of  this  model 
or  a  more  comprehensive  repricing  model.  That  offer  is  repeated,  just  for 


the  record. 
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ABSTRACT 

This  research  represents  an  extension  of 
previous  work  in  the  area  of  estimating 
military  airframe  program  costs  The  effort 
is  unique  in  that  it  yields  a  model  of  the 
production  process  that  considers  the  im¬ 
pact  of  learning,  production  rate,  and  (im¬ 
plicitly)  facility  size  on  total  program  costs 
To  provide  an  empirical  test  of  model  validity 


1.  INTRODUCTION 

The  history  of  cost  estimation  in  the 
military  airframe  industry  consists  mostly 
of  inaccurate  estimates  that  are  insensitive 
to  many  production  decisions.  Congressional 
concern  and  the  need  for  better  planning 
capabilities  provide  the  impetus  for  new  re¬ 
search  in  this  area.  The  approach  favored 
by  the  Department  of  Defense  is  one  of 
estimating  parametric  cost  equations  which 
attempt  to  model  cost  as  a  function  of  only 
a  few  aircraft  design  and  performance  charac¬ 
teristics.  These  models  often  yield  useful 
planning  estimates,  bu;  Large  and  Gillespie 
(1)  show  that  the  models  may  produce 
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the  parameters  are  estimated  for  the  C141 
airframe  program.  The  model's  use  as  a 
prototype  for  models  of  ongoing  production 
programs  is  illustrated  by  estimating  the  cost 
impact  of  exogenous  changes  in  the  program 
delivery  schedules,  eg.  the  "crashes"  and 
"stretch-outs"  that  frequently  characterize 
military  airframe  production  programs. 


estimates  that  can  be  off  by  as  much  as  100%. 
The  real  limitation  of  these  models  is  their 
inability  to  consider  production  policy 
changes  which  may  occur  prior  to  or  during 
the  life  of  a  program.  To  improve  upon  these 
techniques,  new  models  must  be  developed 
that  demonstrate  a  better  understanding  of 
the  factors  and  forces  that  determine  cost. 

In  contrast  to  the  parametric  cost  estimat¬ 
ing  approach,  this  research  involves  model¬ 
ing  the  production  factois  that  influence 
cost  during  an  airframe  program.  In  par¬ 
ticular,  the  influences  of  production  rate, 
learning,  and  delivery  schedules  are  studied. 
A  modeling  effort  with  this  stated  purpose 
requires  considerable  knowledge  of  both  the 
planning  and  production  stages  in  any  air- 
flame  program. 

Before  production,  a  tentative  production 
schedule  is  developed  to  help  in  labor  force 
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planning,  tooling,  facility  needs,  ordering  of 
long  lead  time  items,  etc  This  early  period 
of  time  is  called  the  planning  stage.  The  ten¬ 
tative  production  schedule  is  designed  to 
cover  the  life  of  the  project,  but  the  formal 
agreements  between  the  government  and  the 
contractor  usually  cover  just  one  year  The 
reason  is  that  annual  congressional  funding, 
changing  national  needs,  or  other  exogenous 
impacts  are  continually  varying  throughout 
the  life  of  the  program.  This  penod  of  chang¬ 
ing  situations  is  called  the  production  penod. 
The  essence  of  this  research  is  its  ability  to 
capture  the  relationship  between  total  pro¬ 
gram  cost  and  both  endogenous  and  exogen¬ 
ous  production  rate  changes  during  the  pro¬ 
duction  period.  There  is  now  general  agree¬ 
ment  that  both  learning  and  production  rate 
changes  impact  total  program  costs.  In  the 
former  case,  it  is  usually  assumed  that  pro¬ 
duction  costs  fall  with  cumulative  produc¬ 
tion  experience.  In  the  latter,  the  direction 
and  magnitude  of  the  impact  on  total  cost  is 
less  certain  Empirical  studies  have  shown 
that  changes  in  production  rate  may  be  as¬ 
sociated  with  increases,  decreases,  and  no 
change  in  total  program  costs. 

2.  HISTORICAL  PERSPECTIVE 

Traditional  neoclassical  economic  theory 
explores  the  relationship  between  cost  and 
output  rate  With  the  introduction  of  Wright’s 
(2)  seminal  work,  a  new  dimension  was 
added  to  the  empirical  study  of  cost.  Wright's 
paper  represents  the  foundation  for  many  of 
the  progress  function  studies  that  are  preval¬ 
ent  in  the  engineering  literature.  In  many  in¬ 
stances  these  early  engineering  cost  studies 
seemed  to  contradict  neoclassical  economic 
theory.  Economic  theory  purports  output 
rate  to  be  an  important  determinant  of  cost, 
but  in  most  of  these  engineering  studies  cost 
was  modeled  only  as  a  function  of  cumulative 
output.  In  those  studies  which  considered 
other  variables  as  determinants  of  program 


costs,  output  rate  was  often  found  to  be  un¬ 
important  in  predicting  cost  (see  Alchian  ( 3 ) 
and  Large  et  al.  [4]).  There  is  a  remarkable 
shortage  of  literature  that  recognizes  the 
problem  or  attempts  to  link  the  traditional 
economic  approach  to  the  industnal  engineer¬ 
ing  approach.  Early  researchers  such  as  Asher 
[5],  Alchian  (6,  7),  Preston  and  Keachie 
(8),  Oi  [9],  and  Hirshleifer  [10]  considered 
the  problem  in  a  loose  heuristical  fashion, 
and  m  genera]  their  results  lacked  rigor. 
Rosen  [11)  represented  the  first  attempt 
to  solve  the  problem  directly.  His  work  in¬ 
cluded  the  theoretical  specification  of  a 
market  structure,  the  statement  of  a  criterion 
function,  and  a  straightforward  recursive 
solution  to  the  problem.  Although  this  work 
is  quite  noteworthy,  it  stops  short  of  func¬ 
tional  forms  sufficiently  precise  for  empirical 
estimation. 

The  first  real  applications  oriented  integra¬ 
tion  of  the  economic  and  engineenng  ap¬ 
proaches  came  with  the  work  of  Washburn 
(12)  and  Womer  (13-16).  The  present 
research  effort  represents  the  refinement  of 
a  more  general  model  (13)  for  military  air¬ 
frames.  so  that  it  may  be  used  to  explain 
the  production  and  cost  behavior  of  a  par¬ 
ticular  airframe  project. 

3.  THE  C141  PROGRAM 

The  Cl 41  program  produced  284  aircraft 
during  the  six-year  penod  from  1962  to 
1968.  Only  one  model  of  the  aircraft  was 
produced.  Data  for  this  study  is  drawn  from 
two  sources.  Orsini  (17)  reports  direct  man¬ 
hours  per  quarter  for  each  of  the  1 2  lots  in 
the  Cl 41  program.  He  also  reports  a  delivery 
schedule  for  the  aircraft  by  month.  Orsini 
attributes  these  data  to  the  “Cl 41  Financial 
Management  Reports"  maintained  by  the 
Air  Force  Plant  Representative  Office  located 
at  the  Lockheed  -  Georgia  facility  The 
schedule  of  actual  aircraft  acceptances  by 
month  as  reported  in  the  OASD  (PA&E) 


publication  “Acceptance  Rates  and  Tooling  4.  PRODUCTION  COST  DRIVERS 
Capacity  for  Selected  Military  Aircraft” 

1 18)  was  used  to  check  the  Orsini  delivery  This  section  discusses  four  ways  in  which 

data.  costs  are  affected  by  production  decisions. 

These  data,  like  much  data  on  aircraft  The  concept  of  production  cost  drivers  pro¬ 
production,  provide  labor  hours  for  a  period  vides  the  rationale  for  the  model  winch 

of  time  (quarterly)  and  dates  and  quantities  follows.  That  is.  the  model  contains  com- 

of  deliveries.  Unfortunately,  there  is  no  ponents  that  attempt  to  capture  the  effects 

available  information  which  relates  output  of  each  of  the  production  cost  drivers 

to  the  period  of  time  over  which  labor  hours  The  first  production  cost  driver  is  the  con- 

are  observed.  One  approach  to  this  problem,  cept  of  learning  by  doing.  The  idea  is  that  as 

used  by  Orsini.  is  to  make  some  assumption  the  cumulative  number  of  airframes  produced 

about  the  pace  of  production  on  the  program  becomes  larger,  the  unit  costs  (or  at  least 

and  aggregate  the  quarterly  data  across  lots.  labor  hours)  decrease.  This  component  is 

In  addition  to  being  arbitrary,  this  appraoch  the  only  production  cost  driver  that  is  some- 

reduces  91  potential  observations  to  24.  Our  times  included  in  parametric  cost  estimates, 

approach  to  the  data  problem  is  to  construct  It  is  commonly  discussed  in  both  the  in- 

a  detailed  production  model  of  the  aircraft  dustrial  engineering  and  the  operations  re- 

to  be  delivered  in  any  month.  The  model  is  search  literature,  but  the  learning  curve  is 

then  aggregated  to  explain  the  data,  rather  only  rarely  mentioned  in  the  production  and 

than  the  other  way  around.  cost  related  economics  literature. 

Preliminary  analysis  of  the  data  revealed  To  introduce  the  concept  of  learning  and 

two  additional  data  problems  First,  there  the  other  production  cost  drivers  the  analysis 

were  two  instances,  late  in  the  program.  follows  Washburn  [12]  by  adopting  the 

where  a  small  number  of  labor  hours  were  concept  of  a  production  line  as  a  frame  of 

expended  on  a  production  lot  after  the  reference.  Learning  by  doing  affects  cost 

schedule  indicated  delivery  This  probably  by  influencing  efficiency  at  each  position  on 

is  a  situation  where  deliveries  were  made  out  the  production  line.  That  is.  as  the  number 

of  sequence.  To  remedy  this  problem  the  of  airframes  passing  each  position  on  the  line 

labor  hours  for  the  last  quarter  of  lots  9  and  increases,  yielding  more  experience,  the  ef- 

10  were  aggregated  with  those  of  the  previous  ficiency  at  the  position  increases,  thus  lower- 

quarter  This  reduced  the  number  of  observa-  ing  labor  cost  Notice  that  this  process  un- 

tions  by  two  plies  that  at  any  point  in  time  the  experience 

Tile  other  problem  is  that  m  lots  2  through  on  the  production  line  may  vary  dramatically, 

8.  delivery  of  the  aircraft  seems  to  lag  the  last  e  g.  in  the  C14I  program  as  much  as  two 

expenditure  ol  labor  hours  by  an  average  of  years  elapsed  between  the  lot  release  date 

four  months  For  the  other  five  lots  labor  and  delivery  of  an  airframe, 

hours  are  expended  up  to  the  last  month  The  second  production  cost  driver  is  a  dif- 

of  delivery  To  overcome  this  problem,  the  ferent  learning  effect.  Over  time  learning  how 

deliveries  of  aircraft  in  lots  2  through  8  were  to  produce  more  efficiently  may  take  place 

advanced  by  (our  months  due  to  events  other  than  experience  at  a  posi- 

With  these  adjustments  89  observations  tion  on  the  production  line.  For  example, 

on  labor  hours  lor  24  quarters  for  12  lots  early  in  a  production  program  labor  hours 

were  used.  These  observations,  together  with  may  be  spent  to  learn  how  to  produce  more 

the  number  of  aircraft  delivered  each  month.  efficiently  Later  in  the  program  this  may 

constitute  the  data  lor  the  study  result  in  increased  efficiency  independent 


of  experience  at  a  point  on  a  line.  If  this  is 
the  case,  positions  at  the  end  of  the  line  work 
more  efficiently  on  the  same  airframe  than 
positions  at  the  beginning  of  the  line.  This 
effect  may  be  related  to  experience  at  other 
locations  on  the  production  line.  That  is,  a 
position  late  in  the  production  line  may 
benefit  from  the  experience  of  earlier  posi¬ 
tions.  thus  work  at  later  positions  proceeds 
more  efficiently  than  work  at  early  positions 
on  the  same  airframe. 

A  third  production  cost  driver  is  the  speed 
of  the  production  line.  Unless  there  is  a 
learning  compensation,  increasing  the  speed 
of  the  line  is  expected  to  require  more  labor 
at  each  position  on  the  line.  Furthermore, 
due  to  diminishing  returns,  the  additional 
labor  required  is  expected  to  be  more  than 
in  proportion  to  the  increase  in  speed.  Any¬ 
one  who  has  observed  the  activity  around  an 
airframe  during  production  recognizes  the 
likelihood  of  diminishing  returns  to  labor  on 
that  airframe. 

The  fourth  cost  driver  is  the  length  of 
the  production  line  One  way  to  increase 
delivery  rale  is  to  increase  the  number  of 
positions  on  the  production  line,  reducing  the 
amount  of  work  to  be  done  at  each  position, 
and  increasing  the  total  amount  of  work  ac¬ 
complished  per  unit  of  ume.  If  alternative 
length  production  lines  are  planned,  this  driver 
may  not  be  a  source  of  variation  in  unit  costs. 
However,  if  the  length  of  the  line  is  changed 
on  short  notice,  unit  costs  may  be  affected. 
For  example,  increasing  the  length  of  the 
line  may  result  in  crowded  facilities,  overused 
tools,  and  inefficient  use  of  other  fixed  re¬ 
sources.  These  factors  adversely  affect  the  ef¬ 
ficiency  of  production  and  may  result  in  in¬ 
creased  unit  costs.  This  last  effect  involves 
an  interaction  among  the  airframes  that  are 
in  the  facility  at  the  same  point  in  time  The 
model  of  production  described  in  the  next 
section  represents  an  attempt  to  capture 
these  effects  in  an  estimable  analytic  model. 


5.  THE  MODEL 

The  model  augments  a  homogeneous  pro¬ 
duction  function  with  a  learning  hypothesis. 
The  discounted  cost  of  production  is  mini¬ 
mized  subject  to  a  production  function 
constraint,  and  the  optimal  time  path  of  re¬ 
source  use  is  derived.  Since  factor  prices  are 
assumed  to  be  constant  over  the  relevant 
time  period,  cost  is  measured  in  the  units 
of  the  variable  resoruce.  The  variables  used  in 
the  analysis  are: 

r  =  an  index  for  a  batch  of  airframes  in 
the  same  lot  (j)  ail  of  which  are  to 
be  delivered  at  time  fy, 
n,  -  the  number  of  batches  in  lot  j. 
m  -  the  total  number  of  lots  in  the  pro¬ 
duction  program, 

Dq  -  the  number  of  airframes  in  batch  i  of 
lot  /  . 

Ey  =  a  measure  of  experience  pnor  to  the 
midpoint  of  batch  /,  i.e., 

£*=&'  L  +S  +  . 

**t  /t*i  ii-l 

V  *  the  number  of  airframes  in  the  pro¬ 
duction  process  in  the  facility  at 
time  r. 

tj  -  date  work  begins  for  all  the  batches 
of  lot  /. 

tj,  =  date  work  ends  for  batch  i  of  lot  /, 
<ff(r)  =  production  rate  at  time  t  on  batch  / 
of  lot;, 

Qj,(t)  *  cumulative  production  on  batch  i  of 
lot  /  at  time  t,  i.e., 

i 

f  dr  , 

'/ 

x^(r)  *  rate  of  resource  use  at  time  r  on 
batch  i  of  lot  /. 

5  =  a  parameter  describing  learning  pnor 

to  batch  i. 

t  =  a  parameter  describing  learning  on 
batch  i. 


7  *  a  parameter  describing  returns  to  the 

variable  resources. 

a  *  a  parameter  associated  with  decreases 
in  labor  productivity  as  a  batch  of 
airplanes  nears  completion, 
v  =  a  parameter  describing  returns  to  the 
length  of  the  production  line, 
tj  *  a  parameter  describing  returns  to  the 
size  of  the  batch, 
p  *  the  discount  rate, 

C  *  discounted  variable  program  cost, 

C  ~  discounted  variable  costs  for  a  single 
batch  of  airframes. 

The  production  function  is  assumed  to  be 
of  the  following  form: 

qgO)  =  A  rDJ£*GJ(r)  (/,  -  O'x'fU) ,  (1) 

where  A  is  a  constant.  The  input  x  is  assumed 
to  be  a  composite  of  many  inputs  whose  use 
rate  is  variable  throughout  the  production 
period. 

This  production  function  includes  the  pro¬ 
duction  cost  drivers  described  in  the  previous 
section,  it  conforms  to  economic  production 
theory,  and  it  also  accommodates  the  fact 
that  the  nature  of  work  along  the  production 
line  changes  from  position  to  position.  On 
the  other  hand,  it  is  still  a  very  simple  func¬ 
tion,  and  it  can  only  be  expected  to  describe 
such  a  complex  production  process  with  some 
error. 

The  term  describes  learning  by  doing 
in  producing  a  given  batch  i  in  lot/.  A  priori, 
6  is  expected  to  be  between  0  and  1.  The 
terms  Q’( t)  and  (tj,  -  r)°  represent  attempts 
to  describe  learning  that  occurs  over  time 
during  the  process  of  producing  batch  /  of 
lot  /.  These  terms  also  admit  the  possibility 
that  the  nature  of  work  changes  as  the  air¬ 
frame  moves  down  the  production  line.  In 
particular,  it  is  assumed  that  as  the  batch 
delivery  date  is  approached  it  is  more  difficult 
to  substitute  labor  for  time  in  the  production 
process  Both  <  and  a  are  expected  to  be 


between  0  and  1.  Still  one  more  term  r* 
would  have  been  useful  to  include  in  the 
production  function  to  model  this  effect 
Unfortunately,  a  solution  has  not  been  found 
for  the  resulting  control  problem  if  time  is 
included  in  this  way.  Elsewhere  119],  specifi¬ 
cations  of  this  type  have  been  dealt  with 
extensively. 

The  terms  Dj}  and  Xy(t)  together  capture 
the  effect  of  the  speed  of  the  production 
line.  The  D'j  term  represents  the  number  of 
airframes  in  the  batch  (the  number  of  posi¬ 
tions  on  the  line  occupied  by  the  batch), 
while  Xy(t)  captures  the  effect  of  applying 
more  labor  to  any  given  number  of  positions. 
The  expectation  is  for  r?  to  be  between  0 
and  1  and  y  to  be  greater  than  1.  Below,  it 
is  seen  that  the  effect  of  learning  during  the 
batch  and  the  effect  of  the  number  of  air¬ 
frames  in  a  batch  cannot  be  separated  with 
our  data. 

Finally  the  term  V*  is  intended  to  capture 
the  effect  of  assembling  alternative  numbers 
of  airframes  in  the  same  facility.  It  is  assumed 
that  assembling  more  airframes  in  the  same 
facility  results  in  a  slight  decrease  in  efficien¬ 
cy  ( v  is  negative  and  small). 

Although  the  objective  of  the  firm  is  a 
function  of  the  wording  of  the  contract, 
one  goal  of  most  contracts  is  to  induce  the 
firm  to  minimize  discounted  cost.  The  prob¬ 
lem  may  be  stated  as: 

MinC=£  2  f  x<,(r)e'"dr  (2) 

/*i  fi  r; 

subject  to 

qg(t)  =  A  VD]E*Q',(t)  Uv  -  f)ax| "»(/)  , 

l  =  1,2 . rij 

/'*  1,2 . m 

Qt(ff)  *  Dt  ,  i«  1, 2 . nt 

*  0.  /  *  1,2 . m 


w. 


Since  total  cost  is  monotone  nondecreasing 
and  the  subproblems  are  additive,  the  solu¬ 
tion  can  be  obtained  by  minimizing  each  of 
the  subproblems.  The  problem  may  then  be 
stated  as: 


Min  C  = 


C'  =  j  x» 

v 


(r)e'prdr 


subject  to 

qv(0  =  A  VuD'JE*Q'v(t)  (tv  -  r)° **  ’(/)  , 
QjOii )  -  Dq  , 

Qa(tf)  =0. 

This  problem  is  an  optimal  control  problem 
which  may  be  solved  directly  by  minimizing 
the  Hamiltonian  function.  However,  the 
problem  can  easily  be  transformed  into  the 
problem  of  Lagrange,  which  can  be  solved 
using  classical  variational  techniques.  At 
this  point  the  redundant  //'  subscripts  are 
dropped.  Solving  the  constraint  for  x(t)  yields 

x(t)  *  qyU)A-i  E-6'  Q-'’’  UHtj,  -  t)'a 7 


A  transformation  is  desired  that  yields  one 
state  variable  and  one  control  variable,  the 
control  variable  being  the  time  rate  of  change 
of  the  state  variable.  Let 

Z(t)  =  A-'V-,'D-’'E-6Q,-,U)/0  -().  (5) 

This  implies  that 

z(/)  =  /T'  V^D-'E-'Q-'inqU)  .  (6) 

For  the  transformed  problem  Z(t)  is  the  new 
state  variable,  and  its  time  derivative,  zU), 
is  the  control  variable.  Formation  of  the  new 
objective  functional  requires  absorbing  the 
constraint.  After  using  (4)  and  (6),  an  ex¬ 
pression  is  obtained  for  x(t)  in  terms  of  the 
new  control  variable,  i.e. 

x(t)  x  :y(0  U(,  -  t)"ra  .  (7) 

After  substituting  into  the  objective  func¬ 
tional  and  setting  the  boundary  conditions, 
the  following  transformed  problem  is  ob¬ 
tained: 


Min  C  =■  j  z7(r)(r#  -  ty^e^’dt  =  f  /(z.t)dt 


subject  to 
Z(  0)  =0, 

ZU()  =/r,F-'Z>‘-<-n£-4/(  1  —  e). 

Since  the  intermediate  function,  I,  does  not 
depend  explicitly  on  the  state  vanable,  the 
Euler  equation  is 

r  =  ('*  -  tV't-"  «  K0  .  (9) 

dz 

After  solving  the  Euler  equation,  the  follow¬ 
ing  expression  is  obtained  for  optimal  z(r): 

2(0  =  AT,(r#  -  0ya/<7  "  l)'"/h  ~l)-  (10) 

This  also  provides  a  solution  for  the  optimum 
time  path  of  resource  usage,  i.e. 

x(0  ■  KUtf  -  /)*T/(Y  "  1>e7p,/(7'  -  » .  (11) 

This  optimal  solution  to  the  problem  is  only 
of  transient  significance  since  the  value  of 
the  constant  Kx  is  unknown.  What  is  needed 
is  an  optimal  expression  for  x(r)  that  is  in 
terms  of  the  variables  and  parameters  of  the 
original  problem.  To  obtain  the  constant, 
notice  that 

Z(0  -  S  KiU,  -  r)"7^7  -  uePT/(7  '  ndr  +  . 

(12) 

Let  u  *  p(f$  -  r )/(t  -  1),  then 
Z(u)  «  /  K ,  [(y - 1  )Ip  ) 

e~u+ptqlto-i)j  dw  +  jfa  (13) 

where  J  is  the  Jacobian  of  the  transformation. 
Now,  u(tj)  ■  p{/#  -  r)/(y  -  1)  and  uUt)  *  0, 
so  choosing  0  and  u  as  the  limits  of  integra¬ 
tion  the  appropriate  integral  is 

Z(u)*Kt  J  w«T/<7-i>e-wdu >+Kt.  (14) 

0 

Integration  of  this  expression  yields 
Z(n)-  A,  rlu.ayKy  -  !)♦  1]  ♦  Kt  (15) 
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where  T  is  the  incomplete  gamma  function. 
To  satisfy  the  initial  condition  thatZ(u(//)]  * 
0,  let 

Z(w)  = -tf,  {P [p(/j -/,)/(* -1). 

<*7/(7  —  1  )-*■  1  ]  -r[u, 07/(7  -  D+i  1  }• 

(16) 

Also  let 

[p(f#-0)/(7  -  l),«7/(7  -  1)+H.  (17) 

then  this  implies  that  Z  also  satisfies  the 
final  condition.  Z[u(fy)l  =  A~'V"'D'~*~r'E~i  I 
(1  -  «).  Also,  note  that 

:(r)  =  — ~  =  AT,  [p('j  -  0/( 7  -  D1 07/(7  -  () 
dr  * 

e -«</«/ -0/<v-l>  [-p/(7  _  1}j.  (18) 

After  substituting  for  AT3,  the  following  ex¬ 
pression  is  obtained: 

,(f)  =  i4-H/-«£-«0i-*-n(i 

f  “7  ,.1 


(7„  1)  ’  y  _  1 

p(til~t)\crrl('’~u 


\  (7-1)  / 


e-p<'ij-D!  (tt-1) 


(£> 


This  formulation  for  optimum  r(r)  along  with 
(10)  provides  a  direct  solution  for  Kt.  Sub¬ 
stitution  for  A",  in  (11)  yields  the  following 
optimum  time  path  of  resource  use: 

jtj(r)  =  b  r-TT:74Dj(1  -*-’>)  r  *T 

[p(lij  —  t )/(7  ~  1 ).  «7/(7  -  D+l  J 

X  (f#_,)07«7-l)e-7C(f»-0/(T-l)i  (20) 

and  rlp(tj  -/,)/(T  -  1).  <*7/(7  -  1)+  11  is 
the  incomplete  gamma  function.  This  is  the 
optimal  time  path  for  resource  use  on  any 
batch  of  airframes. 

Since  the  data  presented  in  the  Cl 41  study 
are  quarterly  data,  the  quantity  of  interest 


is  the  total  resource  use  over  a  quarterly 
period.  If  Tk  and  7)  represent  the  beginning 
and  ending  dates  for  the  quarterly  penod  for 
some  batch  i,  the  appropriate  expression  is: 


X(Tk)-X(T,)  = 


=  J*  x(r)  dr  , 


and  using  (1 1)  the  integral  is 


X(Tk)  -  X(Ti) 


=  /  K1U,-! 


yfptKy- 1) 


<ryKy-  1) 


Let  y  =  7 p(‘i!  -  0/(7  -  1 ).  then 

7o(t(j  -  Tk)/(y  -  1) 

X(Tk)-X(T,)  =  -K1  f 

7P('V  -  Ti)l(y  -  1) 

1(7  -  l)/7Pl 07/(7  '  U 

x  y«yliy-Ue-y 

e7pf/;/( 7  -  l)l-<7  -  1)/7P]  jJ y 


Notice  that  this  is  a  form  of  the  incomplete 
gamma  function  Integration  of  (23)  yields 
the  following  expression  for  resources  used 
during  the  interval: 


Xak)-X(T,) 


/  y  _  1  \<*7/(7  -  D*1 

=  ^  ! - ) 

\  yp  / 


X  {r[7P(r#-7))/(7  -  1). 

<*7/(7  -  1)  +  1  ]  - 

r[7P(fv-r*)/(7  -  i). 

*7/(7  -  D+  U  }•  (74) 

Substituting  for  AT,  and  performing  the  neces¬ 
sary  algebra  leaves  an  expression  that  re¬ 
presents  the  optimum  amount  of  resource 
use  over  an  interval  of  time  for  an  individual 
batch  of  airframes,  i.e. 

X/Tk)  -  X,(Tt)  «  A  V'Ef'D}"  -  -"‘(1  -<r 
x  r  Ip(/#  —  r/)/(T  —  1 ). 
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07/(7  -  1  )+l  ]  - 

r[7P(^-r*)/(7-i). 07/(7  -  D+i]  }• 

(25) 

Since  the  data  presented  by  Orsini  [17] 
are  quarterly  data,  the  quantity  of  interest 
is  the  total  resource  use  over  a  quarterly 
period.  If  7"*  and  7/  represent  the  beginning 
and  ending  dates  for  the  quarterly  period  for 
some  batch  i,  the  appropriate  expression  is: 


X(Tk)-X{T,) 


x (/)  dr, 


and  using  (4)  the  integral  is 
X^Tk)-Xv(T,)  =  B'E-f yD}"--'' 
xr’  [p{tii  -  r;)/(7  - 1 ),  07/(7  - 1  )+l  J  V"'" 
x  {r  [7p(/j  -  r,)/(7  - 1 ),  07/(7  - 1  )+i  ]  - 
rhpUv  -  Tk)K-r  - 1 ),  07/(7  - 1  )+l  1 }  • 

(27) 

Because  of  the  nature  of  the  data  it  is  impos¬ 
sible  to  observe  the  quantity  on  the  left  side 
of  eqn.  (27).  What  is  observable  is  direct 
manhours  per  lot.  This  means  that  the  ob¬ 
served  quantity  is 

£  W*(7*)  -X,  (T,)]  (28) 

1*1 

where  there  are  n ,  batches  in  lot  /.  For  this 
study,  the  sum  is  the  observed  values  of  labor 
hours  that  are  reported  in  Orsini’s  data  set. 
This  sum  and  the  number  of  aircraft  deliver¬ 
ed  each  month  are  the  variables  that  are  used 
to  test  empirically  the  validity  of  the  model. 

6.  EMPIRICAL  RESULTS 

To  explore  the  applicability  of  the  theoret¬ 
ical  specification,  the  parameters  in  (27) 


are  estimated  using  the  C141  data  Let  0O  = 
8'  and  0(  =  07/(7  -  1)  +  1.  Furthermore, 
since  e  and  rj  cannot  be  independently  es¬ 
timated  let  X  =  e  +  77.  The  model  may  be 
restated  as: 

£  Xv(rk)-X„(T/)  =£  0o£^yiDlj<l  ~  K)VV 

1*1  ci 

X  r-Mp(r,-r,)/(7-lUI] 

X  {r[7P(f#-  r,)/(7  -1  ),*!,] 

-r[7P(tj-  T*)/(7  -  i),0,] }.  (29) 

Since  the  monthly  delivery  dates  for  each 
batch  within  each  lot  are  known,  it  is  pos¬ 
sible  to  estimate  the  parameters  in  (29)  using 
nonlinear  least  squares. 

TABLE  I 

Panmeter  estimate*  and  asymptotic  standard  errors 


Parameters 

Estimates 

Standard  error 

A 

1-251 

0.9 

3280 

0.7  J 

6 

02809 

0.11 

K 

0292* 

025 

y 

1-022 

0.009 

V 

-0J4 

0.17 

0 

0.0289 

0.008 

The  results  of  this  regression  are  presented 
in  Table  1.  It  does  not  appear  that  all  of 
the  parameters  are  significantly  different 
from  zero,  i.e.  the  asymptotic  standard  errors 
for  0o.  *  and  v  seem  large,  but  restricting  these 
parameters  to  0  generates  large  increases  in 
the  residual  sum  of  squares.  All  of  the  signs  of 
the  estimated  parameters  agree  with  a  priori 
expectations.  In  particular,  notice  that  the 
value  of  7  is  significantly  greater  than  1,  in¬ 
dicating  that  the  production  function  does 
exhibit  decreasing  returns  to  the  variable 
factor.  The  estimated  value  of  the  learning 
parameter  is  also  consistent  with  a  priori  ex¬ 
pectations.  A  5  value  of  0.28  is  consistent 
with  an  83%  learning  curve. 

In  addition,  the  estimate  for  0,  has  a  most 
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interesting  interpretation  with  respect  to  the 
optimal  time  path  of  resource  use.  Notice 
in  (29)  that  0t  is  the  argument  of  a  gamma 
function.  A  gamma  function  with  parameter 
0,  =  3.280  generates  a  time  path  for  resource 
use  that  is  consistent  with  our  knowledge  of 
labor  productivity  patterns  for  “lots”  of  air¬ 
frames.  In  most  cases  resource  use  rises  at 
an  increasing  rate  from  time  tt  to  an  inflec¬ 
tion  point,  after  which  it  continues  to  rise, 
but  at  a  decreasing  rate.  Eventually  resource 
usage  reaches  a  maximum  and  declines  there¬ 
after.  Simulated  time  paths  of  resource  use 
rate  and  cumulative  resource  usage  for  fixed 
V  are  presented  in  Figs  1  and  2.  The  eventual 
decline  in  resource  use  rate  is  attributed  to 
a  decrease  in  the  marginal  product  of  labor 
as  the  delivery  date  for  a  batch  approaches. 
That  is,  before  components  of  the  airframe 
are  assembled,  adding  more  labor  easily  in¬ 
creases  the  production  rate;  but  after  most  of 
the  components  are  assembled,  crowding 
makes  it  more  difficult  to  increase  production 
rate  on  a  batch  by  adding  more  labor.  In  fact, 
the  rate  of  labor  use  on  the  batch  must  fail 
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to  provide  the  optimal  production  rate.  In 
addition,  the  time-consuming  testing  pro¬ 
cedures  that  precede  delivery  may  not  be 
compressed  by  more  labor.  Therefore,  there 
is  a  period  of  time  near  the  end  of  a  project 
where  labor  cost  is  significantly  reduced. 

As  observed  this  functional  form  generates 
a  time  path  of  resource  use  for  a  batch  of 
airframes  that  conforms  to  a  better  under¬ 
standing  of  the  production  process.  How¬ 
ever,  it  is  possible  to  observe  the  time  path 
of  resource  use  for  the  entire  program.  Figure 
3  illustrates  the  predicted  time  path  of  re¬ 
source  use  for  the  program  and  the  actual 
resources  used.  While  the  model  fits  the 
data  well  (fiJ  =  0.69),  the  model  shows  more 
variation  with  time  than  exhibited  by  the 
data.  This  is  particularly  true  for  the  period 
between  quarter  14  and  quarter  19  where 
the  model  predicts  somewhat  fewer  man¬ 
hours  than  used.  Perhaps  this  is  because  the 
model  included  no  penalty  for  hiring  or 
firing  costs.  Therefore,  even  though  the  model 
predicts  that  the  workforce  should  decline 
and  then  rise  again,  the  company  (correctly) 
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Fi(  1  Simulated  optimal  tone  path  of  resource  use  rate  for  a  pven  lot  of  airframes  and  the  S  batchea  within  the  lot. 
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chose  to  maintain  a  higher  workforce  over  the 
relatively  brief  slump.  If  this  is  true,  then  a 
more  appropriate  delivery  schedule  should 
have  permitted  substantial  savings  on  the 
program.  These  questions  are  investigated 
further  in  the  next  section. 

7.  SENSITIVITY  ANALYSES 

To  illustrate  further  the  sensitivity  of 
the  model  to  changes  in  the  delivery  schedule 
the  time  path  of  resource  use  is  plotted  (eqn. 
(20)  summed  over  /  and  /)  for  several  hypo¬ 
thetical  alternative  delivery  schedulles.  Each 
of  the  alternatives  represents  a  small  discrete 
change  to  the  actual  delivery  schedules. 

The  first  alternative,  Fig.  4,  has  the  first 
airframe  in  the  program  delivered  one  month 
later.  This  causes  the  rate  of  resource  use  to 
be  lowered  early  in  the  program,  but  it  is 
increased  as  the  new  delivery  date  is  ap¬ 
proached.  The  net  effect  is  a  small  increase 
in  predicted  program  cost.  This  delivery 
schedule  change  operates  by  adding  one 
month  to  the  first  batch,  increasing  rn, 
by  increasing  (r ,,  -  r,),  the  time  from  pro¬ 


gram  start  until  first  delivery;  and  by  in¬ 
creasing  V  during  quarters  5  and  6  The  ef¬ 
fect  of  delaying  this  delivery  seems  to  be  to 
increase  the  learning  applicable  to  the  first 
unit  by  providing  more  time  prior  to  delivery. 
This  effect  is  offset  by  the  fact  that  V  in¬ 
creases  (the  number  of  positions  on  the  line 
increases).  The  net  effect  is  a  slight  rise  in 
program  cost  and  a  delay  in  program  costs 
(and  benefits). 

The  second  sensitivity  analysis  illustrates 
a  shortcoming  of  combining  the  airframes 
into  batches.  In  this  instance,  the  effect 
of  delivering  the  last  airframe  one  month 
early  is  examined.  This  results  in  reducing 
the  time  to  work  on  the  last  airframe  and  the 
time  for  learning.  It  also  results  in  an  increase 
in  V  during  the  period  when  the  last  airframe 
was  completed.  These  changes  all  argue  for 
slightly  higher  program  costs  for  this  alter¬ 
native.  However,  if  the  last  airframe  is  com¬ 
bined  with  the  previous  batch  of  airframes, 
this  also  has  the  effect  of  reducing  the  num¬ 
ber  of  batches  and  increasing  the  size  of  the 
augmented  batch.  This  last  effect  tends  to 
offset  the  others,  resulting  m  a  very  slight 


F*  4  Predicted  time  pith  of  reiource  u»e  when  the  fVit  lirfrimt  u  delivered  one  month  lite  (»l)d  line  rtpmenti  the 
delayed  delivery). 


uniform  decrease  in  the  time  path  of  resource  the  last  lot  in  quarter  IS,  V  is  lower  dunng 

use.  This  is  illustrated  in  Fig.  5.  that  quarter,  reducing  cost  for  other  lots. 

Next,  consider  the  advancement  of  the  Also  this  effectively  shifts  the  work  on  the 

delivery  of  one  airframe  in  the  middle  of  the  last  lot  to  periods  of  time  when  V  is  lower, 

program.  Between  the  middle  of  quarter  14  but  these  effects  are  partly  offset  by  the 

and  the  middle  of  quarter  IS  deliveries  on  compressed  schedule  for  the  last  lot.  The 

the  Cl 41  program  increased  from  seven  per  effect  of  these  changes  is  a  reduction  of  the 

month  to  nine  per  month.  Only  in  the  first  time  path  in  quarter  15  coupled  with  a  very 

month  of  quarter  IS  were  eight  air  frames  small  increase  in  expenditures  starting  in 

delivered.  Fig.  6  illustrates  the  effect  of  in-  quarter  16.  The  net  effect  of  these  changes  is 

creasing  this  period  where  the  delivery  rate  to  reduce  program  cost, 

was  eight  to  an  entire  quarter.  Here  deliveries  Finally  the  effect  of  an  early  start  on  a 

are  increased  by  one  in  the  last  month  of  lot  in  the  middle  of  the  program  is  con- 

quarter  14  and  decreased  by  one  in  the  sidered.  In  Fig.  8  the  release  date  for  lot  7  is 

second  month  of  quarter  15.  This  decreases  moved  from  the  beginning  of  quarter  11  to 

the  time  available  for  learning,  but  it  also  the  beginning  of  quarter  10.  This  increases 

decreases  V.  The  net  effect  is  a  uniform  resource  use  in  quarter  10  by  permitting  work 

decrease  in  the  time  path  of  resource  use  on  to  take  place  on  lot  7,  and  resource  use  is 

the  program.  also  increased  for  the  other  lots  because  V  is 

The  next  simulation  considers  the  effect  higher.  Later  in  the  program  resource  use  is 

of  changing  lot  release  dates  on  the  program.  decreased  due  to  the  lengthening  of  lot  7. 

In  Fig.  7  the  lot  release  date  for  the  last  The  net  effect  of  these  changes  is  to  raise 

lot  is  delayed  until  the  start  of  quarter  16.  program  costs. 

In  addition  to  preventing  expenditures  on 


>i  s  - 
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path!. 


Fij.  8.  Predicted  time  path  when  a  lot  m  the  middle  of  the  program  11  itarted  early  (aoiid  line  ia  attend  value). 


8.  SUMMARY 

The  objective  of  this  study  was  to  provide 
a  model  of  airframe  production  that  is  well 
grounded  in  theory,  estimated  from  actual 
data  and  sensitive  to  exogenous  delivery 
schedule  effects.  In  this  paper  the  rationale 
for  such  a  model  is  provided,  the  functional 
form  is  derived,  the  estimation  procedure 
and  the  parameter  estimates  are  reported, 
and  the  sensitivity  of  the  estimated  model 
to  delivery  schedule  changes  is  examined. 

The  sensitivity  analyses  clearly  imply  that 
alternative  delivery  schedules  would  have 
resulted  in  lower  costs  for  the  C141  program. 
In  addition,  some  of  these  schedules  are  as¬ 
sociated  with  airframes  being  delivered 
to  the  customer  sooner.  If  so,  it  is  important 
to  ask,  “Why  were  these  lower  cost  and 
higher  benefit  schedules  not  chosen?" 

Certainly  one  possibility  is  that  the  deci¬ 
sion  makers  have  better  insight  than  the 
model  as  to  what  is  best.  There  are  several 
areas  in  which  flaws  in  the  model  may  be  im¬ 
portant.  One  is  the  lack  of  consideration  of 
hiring  and  firing  costs,  and  a  second  is  the 
incomplete  interaction  among  the  batches 


that  is  permitted  in  the  model.  To  elaborate, 
the  model  permits  work  on  a  batch  neither 
to  start  later  than  the  lot  release  date  nor 
to  end  sooner  than  the  delivery  date.  From 
the  point  of  view  of  the  single  batch,  neither 
of  these  events  would  ever  be  optimal;  but, 
if  starting  late  or  ending  early  could  affect 
V,  then  from  the  point  of  view  of  the  pro¬ 
gram,  they  may  be  attractive.  As  it  is  now, 
V  is  completely  determined  by  the  lot  release 
dates  and  delivery  schedule.  Of  course,  more 
and  better  data  might  permit  more  accurate 
and  different  estimated  parameters. 

On  the  other  hand,  it  is  also  possible  that 
with  a  tool  which  permits  decision  makers 
to  grasp  the  program  implications  of  funding 
cuts,  stretchouts,  and  of  altered  delivery 
schedules  more  optimal  decisions  will  be 
made.  Management  science  is  based  on  pos¬ 
sibilities  such  as  these. 
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mi 


//  EXEC  EORTGCLG,T IflE=20 
//FCRT.SYSIN  DD  • 

c 


NONLINEAR  LEAST  SQUARES  .  THIS  PROGRAM  CALCULATES  NON  LIh  EAR  LEASI 
SQUARES  ESTIMATES  Of  TfcE  REVISED  NODE  L  £T  BOBER  AND  GULLEDGE 
USING  SASgUARDIS  CCfltECMISE. 


NOTE. .THIS  PROGRAM  IS  SET  UP  TO  TAKE  A  MAXIMUM  OF  50 0  OBSERVATIONS 
(TIME  PERIODS  ON  LOTS)  AND  1000  INDIVIDUAL  DELIVERY  TIMES  (STORED 
IN  ARRAY  DT)  . 

IF  MORE  THAN  THIS  IS  REQUIRED  DIMENSION  STATEMENTS  MUST  BE 
CHANGED  IN  dOTh  THE  MAIN  AND  SUBROUTINE  ‘MODEL' 


A  DESCRIPTION  OF  THE  V/F TABLES  IS  GIVEN  IN  THE  SUBROUTINES. 


EXTERNAL  MODEL 
COMMON  / AR E A  1  /  A  (50  0,6) 

COMMON  / AR  EA2 /  DT (10  0  0) 

COMMON  /AREAS/  LN(5CC) 

DI  ME  NS  I  ON  Y  (5  GO)  ,TH  (7),tlFF(7),SC3AT  (3000),  SIGNS  (7)  ,DIFZ  (7) 

REAL  S  IGNS/4  *1.0,0. 0,2*1.  0/,  DIFF/3  •.  0  1,  .  00  1 ,  .  0  1,  2*.  0  1/, 
£CIF2/3*.01,.  0C1,.01,2*.C1/ 

INTEGER  STARI1,iUIT1 
N?ROfc=  1 
NP  =  7 

ES  P  1=.  C000  1 
ES  F  2  =. C05 
MIT  =  20  0. 

FL A  M=. 01 
f N  U=  10. 

READ(5,*)NG3,TH(1),TH(2),IH(3),TH(4),TH{5),TH(b),IH(7)  ,  NUMLOT 
LI  =0 

CO  20  J=  1,  NUMLOT 
BEAD  (5  ,*)  LTO 
DO  21  L*  1,  LT  0 
L1*L1*  1 

READ  (5,*)  Y  (LI  )  ,X  (LI  ,  1)  ,  X  (Li,  2)  ,  X  (LI,  3)  ,X  (LI,  4)  ,  X  (LI,  5) ,  X  (LI  ,6) 
C,LN  (LI  ) 

CONTINUE 
STARI1  =X  (LI  ,  2  )  ♦  1 
CU  IT  1=  X  (L  1 , 4) 

DO  100  K  =  STA  H1 1 , „0I 2  1 
REAL (5, •) DT( K ) 

CONTINUE 

CONTINUE’ 

CALL  UBHAUS(NPFCB,  HCLfl,KC3,I,  NP,TH,  DIEF,  SIGNS,  ESP  1,  ESP2  ,HIT,  FLAM 
3  FN  U, SC  BA  I) 


c 

S0330UTI NE  MODEL  (NPBCF,1H,F, NOE, HP) 

C 

C  THIS  IS  A  USER  SUPPLIED  SOBFCUTINE  THAI  EVALUATES  A  GIVES  FUNCTION 
C  (1)  FOB  DIFFEBENT  VALUES  CF  THE  PARAMETERS  (TH). 

C 

C  NPROE  =  PROBLEM  N UM B EB- SCA LAH 

C  TH  PA  RA  M  EIE  R  V  A I U £S- DIM ENS I  ON  ED  A1  TH(NP) 

C  F  PREDICTED  VALLES  FBOfl  REGRESSION  EQUATION, 

C  DIMENSIONED  AT  f  (NOB ) 

C  NOE  2  SAMPLE  SIZE-SCALAR 

C  NP  NUMBER  OF  UNFNCSk  PAHAMET EES -SCALAR 

C  X  IND.  VABIABLE  MATRIX-DIMENSIONED  AT  X(NCB,NP) 

C  X{I,1)  =  END  CF  TIME  IEEICD  (OBSERVATION  I) 

C  X  (1,2)  =  NO.  DELIVER E I  IE1CB  TO  THIS  LOT 

C  X  ( I,  3)  =  PERIOD  WORK  EEGAN  ON  THE  LOT 

C  X(I,4)  =  SEQUENCE  NUBEEf  CF  THE  LAST  AIBFBAM  E  IN  THE  LOT 

C  X  ( 1, 5)  =  AVG.  NO.  IN  BOISE  DURING  THE  PERIOD 

C  X  (1 ,6)  =  STAHI  OF  THE  PEEIOD 

C  T  H  (  1)  =  30 . TEE  CONSTANT  TERM 

C  TH  (2)  =  DELIA . TfcE  LEARNING  PABAHETEB 

C  T  H  ( 3)  =  b  1 AIPFA/ (GAMMA- 1.)  ♦  !. 

C  TH  (4)  =  GAMMA-1..  ..  BFTIRNS  TO  SCALE  (LESS  1.  SO  THAT  GAMMA  >1) 

C  TH(S)  =  HO . ItE  DISCOUNT  PARAMETER 

C  T  H  ( 6)  =  H . THE  PARAMETEB  ASSOCIATED  WITH  AVG.  IN  HOUSE 

C  (ALL  IH  (I )  AfE  RESTRICTED  TO  THE  SIGN  OF  INITIALIZATION) 

C  NUMLOT  =  NUMBER  OF  LOTS 

C  LTQ  =  N'JMEER  OF  CESIEVATIONS  (TIME  PERIODS)  FOB  A  LOT 

C  LN  =  AN  ARBAY  THAT  DEFINES  THE  LCI  NUMBERS 

C 

COMMON  / AB  EA  1  /  X  (500,6) 

COMMON  /A3EA2/  DT(IOOO) 

COMMON  / AR  EA  3/  LN(500) 

D1  MEN5ION  F(1  )  ,X  (1)  ,TB  (1) 

INTEGER  STABT,QUIT 
BH  C  =  . 0 0 1  706 
H2  =  B  HO/T  fl  (  4( 

IF  (R2. L1.0.)  PEINT  19 

19  FORMAT  ('  ERROR . B  2  <0  •  ) 

DO  910  1=1, NOB 
IF  (LN  (I)  . EQ.  10)  K  =  7 
IF  (LN  (  I)  .EQ.  9)  K  =  6 
IF  (IN (I) . LE. 3 ) K=7 
IF  (LN  ( I)  .LE.  b)  K  =  6 
IF  (LN (I) .LE. 2) K=  1 
CT  =  X(I,  1) 

Q 1  N-X (1 ,2) ♦  . 5 
U=0. 

START2  X  (1 ,2)  *1 
QUIT=X  (1,4) 

10 2  X  (I  ,3) 

V=x  (I,  5) 

CT1  =  X  (1,6) 

DO  920  J  1  =  3T ART, QUIT 
1M2DT { J1 ) 

IF  (CT(J1)  .LE.  C.)  PRINT  17 
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17  FORMAT  ( '  EfiBOR .  1  II  IS  <=0') 

IP  (CI1.GE.  THJGO  TO  920 

IF  (CT.  LE.Tfl)  GO  TO  9  25 
BT  =  (1M-CT1  )  *  (IH  (4)  ♦  1.  )  *F2 
E4  =GAM  I  ( T H  (3  )  ,BI) 

GO  TO  930 

S25  BT-  (IN -Cl)  *  ( 1H  (4)0.)  *82 

ET  1  =  BT  ♦  (TH  (4)  ♦  1 .  )  *2  2 
E4*GAM  I  (Til  (3)  ,  BT  1)  -  GAMI  (TH  (3)  ,  BT) 
930  £Q=Q1N**  (-TH  (2)*  (TH  (4)0.)) 

£/  =  ?••  (-  (TH  (4)  ♦1.)*TH  (5)  ) 

F2  =  B2*  (TM-TO) 

IP  (P2. IT. 0. 0  )  FBI  NT  18 

18  FORMAT  ('  £220  3 . F2  <0  • ) 

B^GABI  (TH  (3)  ,  F 2) 

E-E**  (-  (TH  (4  )  O.  )  ) 

0=  U*TH  (K)  *EJ*£»E4*EV 
920  C1N  =  glN*1. 

F(I)=0 

910  CONTINUE 
BEIOHN 
EN  C 


SO  E ROUTINE  UBHAUS  (N  P 8CB  ,  MODEL,  NOB,  Y ,  NP,  TH  , DI FF  ,  SIGNS ,  EPS  1,EPS2, 


«  MIT, FLAM, FNU,SCRAT) 

c 

c  MARGO  A8CTS  COMPROMISE  •***•»*••••*••****••*•**•*••• 

C  M*MM*MM*m»MM**t* 

c 

C  KARQUABDT,  DONALD  V.  'AN  AIGCRITHM  FO 2  LEAST  Si'JIRZS  ESTIMATION  CP 
C  NON  LINDAS  PARAMETERS.'  J.  SOC.  INDUST.  APPL.  HATH.  VOL.  II 
C  (JUNE,  1*63),  431-34. 

C 

C  LAMBDA  LA  HGE=  3TE  E  F  ESI  DESCENT - SHIFT  TO  L IN E AS IS AliuN 

C 

C  NP2C3  =PKCELEM  NU PE EB-SCAL AR 

C  KC D EL  = « A M E  OP  SUEHCUTINE — MUST  DECLARE  AS  EXTERNAL  IN  MAIN 

C  LINE-USEB  SUFFLIED  SOEBOUTINE  TO  COMPUTE  THE  FITTED 

C  VALUES  F30M  THE  REGRESSION  EQUATION. 

C  NOB  =  NUM3EB  CF  C l S f BV AT  IONS -S CAL AB 

C  T (I)  = V  ECTOR  OF  OBSERVATIONS  ON  THE  DEPENDENT  VARIABLE- 

C  DIMENSIONED  1 1  I  (NOB) 

C  NP  =  N  U  M  8  E  R  OF  UNKNOWN  PARAMETERS -SCALAR 

C  TH  =VECT02  OF  F  A  5  A  METE  H  S- DI  ME  N  SI  0  NED  AT  TH  (NP) 

C  DIPF  =R  ELATIVE  STEI  SIZE  IN  NUMERICAL  DIFFERENTIATION- SAY  .0 

C  DIMENSIONED  AT  DIFP(NP) 

C  SIGN  =  0.  FOR  ONFSSTBICTED  SEARCH , 

C  =1.  SIGN  CF  I  TH  PARAMETER  MOST  NOT  CHANGE- 

C  DIMENSIONED  AT  SIGN(NP) 

C  ESP  1  =  TERMINATICN  VALUE  OF  SUM  OF  SQUARES  S  (THETA) - 

C  SAX  10. **-07-SCALAS 

C  ESP 2  =  TERMINATICN  BASED  ON  TAB AMETERS-SA Y  10. **-0 3 

C  BIT  =  3AIIE0N  NC  CF  IT ER ATION S- SC A  LAB 

C  FLAB  =  LAMBDA  EQUALS  APPBCX  0.01-SCALAB 

C  F NU  -  GAMMA  EQUALS  APPROX  10. -SCALAR 

C  SCR  AT  =  STORAGE  ARB  i  Y.  MAIN  LINE  DIMENSION  GE 

C  5*N?»Nr**2O*N0BO0B*NP 


DIM  INS  ION  SC  RAT  (1)  ,IH  (1 )  «  1  (1)  ,DIPF  (1)  ,SIGNS(1) 

IA  =  1 

18  =1 A* NP 
IC=IB»N? 

ID  =IC* NP 
IE=IC*N? 

IP  =1 E*  NP 
IG  =  IF  *NO  B 
IH=IG*  NC3 
II  =  IH«-N?*N03 
I J  =1 H 

CALL  HAUS59(NPROB,MODEL,NCB, T,NP ,TH  ,  DI PF , SI GNS , E FS 1 , EPS  2 , SIT 
J,PLAM,FNU,SCRAT(IA)  ,  SCS/I(I8)  , SCR AT  (IC)  ,  SCR  AT  (ID)  , 

JSC  HAT  (IE)  ,  SC  Q  AT  (IP)  , SCR  AT  (IG)  ,  SC  RAT  ( IH)  ,  SCR  AT  ( 1 1)  , 

JSC  PAT  ( IJ) ) 

RETURN 
EN  D 


S'J  E ROUTINE  HAU559  (N  PREC  , MODEL,  N3  C,  Y ,  Ng,TH , DIFZ , SIGNS ,  E?  IS,  EP2S 
J  MI  I  ,  F 1 A  M  ,  F  NU  , C,P,  E, EHI, TE, F, R, A,E, CELZ) 

N?  BOB  =  VAHIAELE  INDICATING  THE  PROBLEM  NUMBER 

MODEL  =  SUBROUTINE  HHICE  COMPUTES  THE  VALUES  Up  THE  MODEL 

NCE  =  NUMBER  OF  OBSERVATIONS 

Y  =  VECTOR  CP  CESIPVIC  FUNCTION  VALUES 

NP  =  NUMBER  CP  UNKNOWN  PARAMETERS. 

NP  IS  BIGGER  TEAS  1  AND  SMALLER  THAN  11  IN  THE  PROGRAM 
TH  =  VECTOR  OF  PARAMETER  VALUES 

DIFP  =  VECTQF  CF  FRCFCFIIONS  IN  I H.  II  IS  USED  TO  CACULATE 
THE  NUMERICAL  DERIVATIVES  OF  THE  FUNCTION. 

SIGNS  =  VECTOR  INDICA1I1G  THE  EXISTENCE  OF  A  PRIORI  SIGN 
RESTRICTIONS. 

EPS1  =  RELATIVE  CHANGE  cf  THE  FUNCTION  CRITERION 

EPS2  =  PARAMETER  CONVERGENCE  CRITERION 

MIT  =  MAXIMUM  NUMEEF  CF  ITERATIONS 

FLAM  =  STAS  TING  VALUE  FCB  LA  M  DA 

FNU  =  VALUE  CF  NU  IC  FECUCE  L  AMD  A 

SCR  AT  =  TEMPORARY  STOBAGE  FOR  OSE  BY  UWHAOS 

DIMENSION  TH  (  N  2)  ,DIFZ  (NO  , SIGNS  (NJ)  ,T(NBC) 

DI  PENSION  NC)  ,P(N;)  ,F  (AC)  ,PHI  (Nil  #TE  (HwJ 

DIMENSION  F (NEC)  ,S  (NEC) 

Cl  ME  NS  ION  A(  N  C  ,  NQ)  ,  L  (NQ ,N£)  ,  DLLZ  (N  BO,  NO 

COMMON  /AREA  1/X(500,C) 

COMMON  /AREA3/IN  (BOO) 

DI  PENSION  It)  (1)  ,DIFZ  |1)  .SIGNS  ( 1)  ,  Y  ( 1)  ,  Q  (  1)  ,  P  ( 1 )  ,  E  ( 1) 

JPHI  (1)  ,TB(  1)  ,  F  (  1)  ,  S  ( 1).  A  (1)  ,D  (1)  ,DELZ  { 1)  ,  SUMO  (100)  ,SUHP(  100) 

MP  =  NC 

MPBCB- NPF30 
NO  E-NBO 
EP  S 1  =E  PI  S 
EP  S  2  =  E?2S 
NPSC  =  NP*NP 

NSCPAC=5*UP*N?SC*2*NCfc>NP*NOB 
PRINT  1000, NPROB, NOB, NP.NSCRAC 
PRINT  1001 


CALL  GAS S6 0(1, NP,Tn,TEflf, TEMP) 

PRINT  1002 

CALL  G  A JS6  0  ( 1  ,NP,DIFZ,TIEF,TEHP) 

IF  (.1  IN 0  (N?-1  ,  50- NP,  NOE- NP, HIT-  1,  99  9-HIT)  )  99,  15,  15 
IF  (f  NU-1.0)  99,  99,  16 
CONTINUE 
DO  19  1=1, N? 

TEMF=A£S  (DIF 2  (I)  ) 

IF  (A  HI  HI  (1.0-IEHP,  AES|TF(I))))99,99,  19 

CONTINUE 

GA  =  FLAfl 

NIT  =  1 

LA  CS=0 

IF  (EPS1) 5,70 ,70 
E?  S  1  =  0 

ss  ;  =  o 

CALL  MODEL  (N  P ROD, TH  ,  F , NCB  , NP) 


R  (I )  =  I  (I )  -  F  (TH ) 
INITIAL  SUH  OF  SQUARES 


DO  90  1=1,  NOB 

a  (i )  =  x  C)-P(i) 

90  SS  Q  =  SS  C  ♦  8  ( I)  *R  (I) 

PEINI  1 0  03  ,S  SQ 
C 

C  •**♦♦♦*****»****•♦**♦***  EEC1N  IT  E  B  AT  ION 

C 

100  GA=GA/FNU 
INTCNT=0 
PRINT  1 0  04  ,  Nl  T 
10  1  J5  =  1-N03 

DO  130  J=1,NP 
TEHF=TH(J) 

P ( J) =DIPZ(J)  *TH  (J) 

TH  (J)  =TH  (J }  ♦  P  (J) 

SU)  =0 

JS  =  JS+  NCB 

CALL  aCDEL  (S?B03,TH,  DELZ  (J S)  ,NOB,NP) 
I J  = JS-  1 


NUMERICAL  EV AIU AT  IONS  OF  DERIVATIVES 


DO  120  1=1 , NCB 
IJ  =  IJ*  1 

DE  LZ  (I  J)  =  DE*.Z  (IJ)  -F  (I) 
t  (J)  =Q  (J)  ♦DEL  Z  (IJ) *B  (I) 
Q(J)=Q(J)/P(J) 


Q  =  XT*R  (STEEPEST  DESCENT) 


TH  (J) =TEMP 
IF  (LAOS)  131,131,414 
DO  150  1=1,  NP 
DO  151  J=1,I 
SUH=0. 

K  J  =  NOB  •  (J-1) 

KI=NOB*  (I-  1) 

DO  160  K  =  1 , N  OB 
BI=KI*1 
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KJ  =KJ ♦ 1 

SUH=SUK+DELZ (KI)  *D£LZ(KJ) 
IEME=SUH/(P(I)  *P  (J)  ) 
JI=J*NP*  {1-1  ) 

D  (JI) =  TEMP 
IJ  =  I*  N  F*  (J-1  ) 

D(IJ) =TEMP 
E{I) =SQRT(D(JI) ) 

C0N1INUE 
DO  153  1=1, NP 
I J  =  I  -  N  P 


C  *******  SCALING  OF  XTRANSICSE  X  M AT  R IX  TO  E—  1/2XTRANS  X  D-1/2  ******* 

c  *******  SCALING  OF  XTBANS  S  TO  D-1/2  XTRANS  R  ******* 

C  *******  ADD  LAMDA  I  TO  SCALED  XTRANS  X  HATRIX  ******* 

C 

DO  153  J=1,I 

I  J=I  J*  NP 

A(IJ)=L{U)/(E  (I }  *  E  (J)) 

JI=J*i*P*  (1-1) 

153  A  ( J 1  _* - A ( I J ) 

C 

C  ••*•••<:«**•**********  A=  SCALED  MOMENT  MATRIX  ************************ 

C 

II =- NP 

CO  155  1=1, NP 
P(I)=Q  (I)/E(I) 

PHI  (I)  =P  (I) 

II  =NP*  UII 

155  A  ( 1 1)  =A  ( II)  ♦  G  A 

1=1 


i 


C  •*  CALCULATE  THE  DEI  ER  MI  KENT  AND  INVERSE  OF  C-1/2  XTRANS  X  D-1/2*LA  ** 
C 

CALL  KATIN(A,N?,P,I,tET) 

C 

C  *********************  p/E=CCFf ECI ICN  VECTOR  ******** *************** *** 

C 

STEP= 1 . 0 
SOM  1  =  0. 

SUM2=0. 

SU  M  3=0- 
DO  231  1=1, NP 
SOM  1  =  ?  (I)  *  PH  1(1)  *SUM  1 
SU M2  =  P (I) *P(I)  *SOM2 
SUM3=  PH  I  (I)  *  PHI  (I )  ♦  S  UM  3 
23  1  PH  1(1)  =P  ( I) 

IE  HP=SUM1/SQRT  (SUM2*SL’M3) 

TE  BP  =  AMIN  1  (TEMP,  1.0  ) 

TEHP=57. 295* ACOS (TEMP) 

PRINT  1041 ,DEI, TEMP 
170  DO  220  1  =  1, NP 

P(I)=Pitl  (I )  *S1  EP/E  (I ) 

TB  ( I )  =T H  (I)  ♦  ?  (I) 

220  CONTINUE 

PRINT  7000 

7000  FORMAT {///'  TEST  POINT  PARAMETER  VALUES') 

PRINT  2006, (TB(I)  ,1=  1,U) 

DO  221  1  =  1, NP 
IE  (SIGNS(I))  2 2  1,221,222 
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22  2  IF  (SIGN( 1.0, TH (I)) *SIG N  (1.0, T3  (I)) )  663,221,221 
22  1  CONIINUE 
SO  (1E=0. 

CAIL  BCD  EL  (NPFOB,TB,f,NCE,NP) 

CO  230  1=1, NOB 
R(I)=X  (I)-F(I) 

230  SUHE  =  SUM3*R(  I)  *2  (I) 

PR  I  NT  1043  , SUBB 

IF  (SUB  o—  (1.0  ♦EPS  1)  *SS£)  462,662,663 
C 

C  •«**•**  if  ANGLE  LESS  THAN  30  DEG  THEN  DECREASE  STEP  SIZE 
C 

663  IF  (AMIN1  (TEH  P- 30. 0,  GA  ) )  465,6o5,664 
66  5  STEP-STE  P/2.  0 

INICNT=INTCNI+1 
IF  (INTCNT-36)  170,  2700,2100 

664  GA=GA*FNU 


IN  TCNT  =  INTCN T  +  1 
IF  (INTCNT-36)  66o , 27 0 0 , 27 0 0 
662  PRINT  1007 

DO  669  1  =  1, NP 
669  TH  (I)  =  T3  (I) 

CALL  GA3S60(  1 ,  NP , TH , T EK £ , 1ESP) 

PRINT  1040  ,G  A, SUBS 
IF  (EPS2)  229,229,225 
229  IF  (EPS  1)  270,  270,  265 
C 

C  *****************  PARAHETER  CONVERGENCE  CRITERION  **♦*»***♦***♦♦♦♦**** 

C 

225  DO  240  1  =  1  , NP 

IF  (ASS  (P  (I))  /  (1.  E-2  0  ♦  /  ES  (TH  (I)  )  )  -EPS  2)  240,  2  40,  24  1 
241  IF  (EPS  1)  270,270,265 
24  0  CONTINUE 

PR  INI  1009, EPS2 
GO  TO  260 
C 

c  ***************  su;-  OF  SCUflES  CONVERGENCE  CHITERICN  ♦*****♦*♦*»♦••♦•* 
C 

26  5  IF  (A  BS  (SUBB-  SSw)~  EPS  1*S  '2  )2o6,266,270 
266  PRINT  10  10  ,E  PS  1 
GO  TC  260 
270  SS;  =  SUBB 
NiT  =  NI  1*  1 

IF  (NIT-111  T)  IOC,  100,  2  8  C 
2700  PRINT  2710 

2710  EORNAT  (//  50H0***  THE  SUB  OF  SQUARES  CANNOT  BE  REDUCED  TO  THE 

i//  55U  SUB  SCUARES  AT  ThE  END  OF  THE  LAST  ITERATION  -  STOP  /  ) 


C 

c  «******•****«**••»*•*•••  JM  ITERATION  **♦»♦***♦♦ 
C 

c  FINAL  FUNCTION  VALUES  AND  RESIDUALS 

C 


280  PRINT  1036 
PRINT  1036 
PH  I  NT  1011 
PRINT  1036 
DO  342  1=1  , NOB 

34  2  HSITE(3r*)  I  (  I)  ,F  (I)  ,  R  (I )  ,  X  (1 ,  1 )  ,  LN  (I) 
DO  8  10  J LP=  1  ,  ICO 
SUBC ( J IP ) =0. 0 


sunf  jjlp)  =o.  o 

DO  820  ILP=1,KOB 
JL f  =  X  { IL P,  1) 

SO  no  (JLP)  =SOHO  (JLP)  ♦  Y  (IIP) 

SUHE  (JLP)  =  SUflf  (JLP)  *f  (IIF) 

DO  845  0 LP  =  1  ,  100 
IF  (SUMO  (JL?)  .  EJ.0.0)  GO  10  850 
PR  INI  840,  JLP,SOflO(  JIf)  ,SUflP  (JLP) 
fO  E3  AT  ('  '  ,1  X,I4,9X,F12.6,2X,F  12-6) 
CO  NT  IN  OE 
CO  Nil  NOE 
SSC=SUMB 
IDF=NC3-NP 
PRINT  1015 
1=0 

CALL  MATIN (D, NP,P, I , E IT ) 

DO  7692  1=  1,  NE 
II  =  !♦ N  P*  (1-1  ) 

£  1 1)  =SCaT(D(II)  ) 

DO  340  1  =  1  , N  P 
J I  =  I ♦ N P* (1-1 ) -  1 
IJ=I*NF*  (1-2) 

DO  340  J  =  I , N  P 
JI=JI*  1 

A  ( JI )  =  D  ( JI )  /  ( E  (I )  *E(J)) 

IJ  =IJ*NP 
A  (  IJ)  =  A  ( J  I) 

CALL  GAoS60(3 ,NP,TEflf,TIEE,A) 

PRINT  131(j 

CALL  GASS60(  1  ,N?  ,  £,  T  EEP  ,TEM?) 

IF  (IDF)  341  ,4  10,34  1 
SDEV=SS,/IDP 
PRINT  1014 ,SDEV, IDF 
SDIV  =  SQRT  (SDEV) 

DO  391  1=1, NP 
P  ( I)  =T H  ( I)  *2. 0*E  (I)  *SEE^ 

IS  (I) =lri (I) - 2.0*E (I)  *SEIV 

PRINT  1036 

PuINT  1039 

PRINT  1036 

PRINT  1038 

DO  423  1=1 ,NP 

PRINT  1037,I,TH(I)  ,  TB  (I),P  (I) 

LA  CS=  1 
GO  TC  101 
DO  415  K  =  1,NOB 
TEMP=0. 

DO  420  1=1, NP 
DO  420  J=1,NP 
ISUE=K  ♦NOB*(  I-  1) 

D£SLiG1=DELZ(ISUB) 


DE3UG 1=CfLZ (K*  N  OB •  (1-1) ) 


I S  UB  =  K* NOB  * ( J-  1) 
CEfcl)G2=DELZ(ISUB) 


IJ=I*NP*  (J-1  ) 


DEBUG2  =  Cf  IZ  (K4NC3*  (J-1) ) 
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1043 
20  01 
2006 
9999 


EEBUG3  =D  (I  J)  /  (DIF2  (I)  *TH  (I)  *DIF2  [J)  *TH  (J)  ) 

T£HP-=T£MP*DEBUG  1* DEB  UG2*DEB  UG  3 
TE  H  F=2 . 0  *S  QR  T  (TEMP)  ^SIEV 
B  (K)  =  F  (K)  *TEMP 
F  (K) =P (K )  —  TEM  P 
PHI  NT  1003 
IE  =  0 

DO  425  1=1, NOE, 10 
IE  =  IE*  10 

IP  (NOB -IE)  430  ,4  ,;>,4  35 
IE=N08 

PHINI  2001, (R  (J)  ,J=I,IE) 

PRINT  2006,  (F  (J)  ,J=I,IE) 

PRINT  1033,  N  PRO  B 
GO  TO  9999 
PRINT  1034 
GO  TC  410 

FORMAT  ('  NONLINEAR  ESI I  CATION ,  PROBLEM  NUMBER  ',I3,//I5, 

3*  OBSERVATIONS,  •,!£,•  PARAMETERS  ',114,'  SCRATCH  REQUIRED') 
FORMAT  (//'  INITIAL  FAFAPEIER  VALDES') 

FORMAT  (/•  PROPORTIONS  USED  IN  CALCULATING  DIFFERENCE  QUOTIENTS'  ) 
FOR  MA I  (/  '  INITIAL  SUP  Cl  SQUARES  =  *,E12.4) 

FOBMAI  (/////'  ***********************************************  • 

3,'  ITERATION  NO.  ',14////) 

FORMAT  (//•  PARAMETER  VALUES  VIA  REGRESSION') 

FORMAT  (///'  APPROXIMATE  CONFIDENCE  LIMITS  FOR  EACH  FUNCTION  VALUE' 
3) 

FORMAT  {////'  ITER ATI C  A  STOPS  -  RELATIVE  CHANGE  IN  EACH', 

3'  PARAMETER  LESS  THAN  ',112.4) 

FORMAT  (////'  ITERATION  STOPS  -  RELATIVE  CHANGE  IN  SUM  OF', 

3'  SQUARES  LESS  THAN  ',£12.  4) 

FORMAT  ('**  OBSERVED  FITTED  ****  RESIDUAL  **') 

FORMAT  (  3E12.  4) 

FORMATt//'  VARIANCE  Cl  FESIDUALS  =  '  ,  E  1  2.  4,  IX,  14, 

3'  LFGRtES  OF  FREEDOM' ) 

FOEMAT  (////'  CORRELAI IC  A  MATRIX') 

FORMAT  (////'  NCEM  ALIZ1  NC  ELEMENTS') 

FORMAT  (//'  ENE  OF  PROELFH  NO.  *,I3) 

FORMAT  (/ '  PARAMETER  FRRCR •) 

FORMAT  ('  '  ) 

FOEMAT  (/'  IN  DIVIDUAL  CONFIDENCE  LIMITS  FOR  EACH  PARAMETER  ', 

3  '  (  C  N  LINEAR  HYPOTHESIS)') 

FORMAT  (I  4 , 3E  1  2. 4  ) 

FORMAT  ('  I  TH  ( I )  CONFIDENCE  LIMITS  ') 

FORMAT  (///'  I  AM  ED A  =  ',£10.3,301,'  SUM  OF  SQUARES  AFTER', 

3'  REGRESSION  =  • ,E1 5. 7) 

FO  RM  AT  (//'  DETERMINANT  =  ',E12.4,6X,'  ANGLE  IN  SCALED  COORD.  =  ', 
3F5.2,'  DEGREES') 

FORMAT  (//'  TESI  POINT  SUE  OF  SQUARES  =  ',E12.4) 

FORMAT  (/5E1  2.4,//5E  12.  4) 

FORMAT  {/5E1 2 .4,//5  E 12.  4) 

RETURN 

END 


SUBROUTINE  M  ATI  N  ( A ,  A  V  /  R  ,  E,  NB,  D  ET ) 
DIMENSION  A  ( N  V AR ,  1 )  , B  (N  VAB , 1 ) 

PI  V CTM  =A  (1,  1) 

DE1=1. 0 
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CO  550  ICO L=  1  ,  N  V  AR 
PI VCT= A ( ICOL , ICOL) 

PIV0TM=AMIN1  (PIVOT,  EIVCIH) 

C£T  =  PI  VOI*D£I 
C 

c  m*mm*m*m*«*  DIVIDE  EIVCI  BOV  EY  PIVOT  ELEMENT  ***•****•••**♦*• 
C 

A  (ICCi  , ICOL)  =1.0 
PIVCT=AMAX  1(  PIVOT,  1.  E-2C) 

PI  V01=  A  (ICOL,  ICCI) /EIVCI 
DO  350  L=1 ,H V AB 

350  A(ICOL,L) =A( ICOL,L) *?1VCT 
IF  (NB. EQ.O)  GC  TO  37  1 
DO  370  L  =  1 , H  3 

370  B ( ICCL, L) =B ( ICOL ,L) *PIVCT 
C 

C  *******************  RiuUCE  NCN-PIVOT  aovs  ************************* 

c 

37  1  DO  550  L  1=  1,  N  VAS 

IF  (LI.  EQ.ICGl)  GC  TC  55C 
T=  A  (Li,  ICOL) 

A (II ,1 CC I) =0. 

CO  450  L  =  1,N  VAR 

450  A  (11,1)  =A  (LI  ,  I )  -  A  (I  CCI,  I)  *T 
IF  (NB. EQ.O)  GO  TO  550 
DO  500  L  =  1 , N  3 

50  C  B  (L1,L)=B  (LI  ,L) -B  (I  CCI,  I)  •! 

550  CONTINUE 
BETUBN 
END 
C 
C 

c 

SUBROUTINE  3  A5S6  0  (I  T  Y  I E  ,  K,  A,  B,C) 

C 

C  THE  ONLY  FUNCTION  CF  THIS  SUEEROGBAH  15  TO  CAREY  OUT 
C  VARIOUS  PRINTING  TASKS.  IT  PRINTS  THE  VALUES  OF  VARIOUS  QUANTITIES 
C  THAI  ARE  PASSED  IN  THE  ABCUflM  LIST  OVER  THE  RANGE  LOW  TO  LUP, 

C  V  HER  E  LUP  IS  THE  NUMBER  OF  PARAMETERS  (VARIABLE  UP  TC  10). 

C 

DIMENSION  A(N  Q)  ,  B  (NQ)  ,C  <NQ,NQ) 

NP  =  NQ 
NR  =  N  E/  1  0 
LOB=  1 
LU  P=  1  0 

10  IF  (NR)  15,20,  3  C 
15  RETURN 
20  LU  P  =  N? 

IF  (LCH.GT.  LUP)  RETURN 
30  PRINT  500,  (J  ,  J=LOV,  LUF) 

GO  TO  (40,60,80)  ,IT  YE  F 
40  PRINT  600,  (A  ( J)  ,  J=  LC  V  ,  LC  E ) 

GO  TO  100 

60  P3INT  600,  (D  (J)  ,J=LCH,LUE) 

GO  TO  40 

80  CO  90  I  =  LO V, L UP 

90  PRINT  720,1,  (C  (J,I)  ,J=LCR,I) 

LOV2=LUP*1 

IF  (LOV2.GT.N?)  GO  TO  IOC 
DO  95  I  =  tOV2  ,  NP 
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95  PSINT  720,  I,  (C  (J,I)  ,J=LCW,LUP) 

100  LGM=LOW*10 
LOf =  LUF* 10 
NB  =  N  5-  1 
GO  1C  10 

500  FOBfiAT  (/SI  12,//5I12) 

60  C  FOBMAT  (/5S 12. 4,//5E  12.4) 

72  0  FOHflAT(1HO,U,lX,SPi:.4,/5X,5F12.4) 

BETOBN 
END 
C 

c 

c 

FUNCTION  GA.ri  |  A,  X) 

C*  *  *B  EV I S ICN  OCTOBER  1,  199C 
C* • *CATEGCR  i  NC.  B5F 


C  *  •  *XE  YW  C  8D  (S)  G  A  M  3  A  F  U  NCI  IC  N  ,  I  NC0.1  PLET  E  CAUSA  FU  NCT  ION ,  59  ECI A  L  PUNCTIGN 
C*  *  *DAT£  WRITTEN  JULY  1977 
C***AUIHCR  FULLE2TCN  V.  (IASI) 

C  *  * •?  URPCSE  -  COHPU1ES  THE  1NCCCFLET  E  G  A  HH  A  FUNCTION 
C*  *  *DESC  5IPT ION 

C  JULY  1  977  EDITION.  W.  FUILIS1CN,  C3,  LOS  ALAflOS  SCIENTIFIC  LA 3. 

C 

C  EVALUATE  THE  INCOMPLETE  GAHFA  FUNCTION  DEFINED  BY 
C 

C  G  AH  I  =  INTEGRAL  FROH  T  =  C  1C  X  OF  EXP(-T)  *  T**(A-1.0)  . 

C 

C  GAHI  IS  EVALUATED  FOP  POSITIVE  VALUES  OF  A  AND  NON-NEGATIVE  VALUES 
C  OF  X.  A  SLIGHT  DETERIORATION  OF  2  OB  3  CIGITS  ACCURACY  MILL  OCCUB 
C  WHEN  GAKI  IS  VERY  LARGE  OF  VERY  SHALL,  BECAUSE  LOGAHITHMIC  VARIABLES 
C  ARE  USEE. 

C 

C***BO(JTINES  CALLED  GA«T,/I»GA« 

IF  (A.LE.  J.  0)  PRINT  970 
IP  (X.LT.  0.  0)  PRINT  97C 

FORHATC  •  **•*  GAHI . A  HUST  BE  GT  0  AND  X  GE  O') 

GA  H I  =  0 . 0 

IF  (X.E*.  0.  0)  RFIOFN 
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C  THE  ONLY  ERROR  POSSIBLE  IN  THE  EXPRESSION  BELOW  IS  A  FATAL  OVERFLOW. 
C 

FACIGR=EXP  (ALNGAH(A)  ♦A*ILCG(X)  ) 

GANI  =  f  AC  TO  a*  G  A  HIT  (A  ,  X  ) 

RETURN 

END 


FUNCTION  ALNGAfl(X) 


C*  ••HE  VI  SION  OCTOBER  1,  1980 
C.*  •  ‘CATEGORY  NO.  B5F,33 

C*  •  *K  EYW  CR  D  ( S)  LOGARITHM, GAf.  HA  FUNCTION,  SPECIAL  FUNCTION 
C* • *DA IE  WRITTEN  JUNE  1977 
C***AUTHOB  FULLER  ION  W.  (LASI) 

C*  *‘PU  RPCS  E 

C  COnPUTES  THE  LOG  CF  THE  AESCIUTE  VALUE  OF  THE  GAHfl A  FUNCTION. 

C • *  *DESC  R IPT ION 

C  JUNE  1977  EDITION.  H.  F  t  L I E  ETON ,  C3,  LOS  ALAHCS  SCIENTIFIC  LAB. 
C 
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C  SC2PIL  =  ALOGlS^ai  (2.*PI)  ),  SfiPI2L  =  A  LOG  (SQRT  (PI/2.)  ) 

C 

C***aoUTINES  CALLED  B9LGec,GFi!aA,  bimach 

DATA  SQ2PIL  /  0.9189385332  0467274E0/ 

DATA  S t P I2L  /  0-  2257913526  4472743E0/ 

DA  1 A  PI  /  3.1415926535  8979324E0/ 

DATA  X* AX, DX R EL  /0.,0./ 

IF  (XflAX.  NE.O.  )  GO  TO  10 
XMAX=R  1MACH{  2)  /ALOG  (R  1HACH  (2)  ) 

DXHEL=S2BT (8  1EACH(4) ) 

10  Y=ABS(X) 

IF  (T.GT.  10. 0)  GO  TO  20 

C 

C  ALOG  (AES  (GAMMA  (X)  ) )  F08  AB £  ( X) . LE -  1 0. 0 
C 

ALNGA.'l=AL0  3iAES(GAM.1A  |X)  )  ) 

BE  TUB  N 
C 

C  ALOG  (ABS  IG  AKMA  (X)  )  )  FOB  A  IS  (X)  .  G7.  10. 0 
C 

20  IF  (Y.GI.  X3AX)  FBI  NT  971 

97  1  FO  art  AT  ( '  *****  ALNGAM  ABS(X)  CAUSES  0 VERFLCW  * ) 

IF  (X.GT.O.)  A  LKGAM=S£ 2III*  (X-0.  5)  *  A  LOG  [X)  -X*39LGMC  (Y) 

IF  (X.GT.  0.  )  8EIUEN 
SI  N  r  IY  -  A  BS  (S  IN  (PI«Y)  ) 

IP  (SINPI  Y.  E2.  c.)  PHI  NT  9  72 

972  FO  R  E  AT  ('  *****  ALNGAP...  X  IS  NEGATIVE1) 

IF  (ADS ( l X- A  IN  I  (X-0. 5) )/ X ) . LT.D  XnEL) PHI  NT  973 

973  FORMAT  ( '  *****  ALNGAM _ LT  HALF  P3  ECISION' ) 

ALNGA3  =  S0?I2L«-  (X-0.  5)  *AICG  (Y)  -X-ALOG  (SINPIY)  -H9LGMC  (Y) 

RETURN 

END 

C 

c 

c 

FO  ACT I  ON  G  AH  I T  (A,  X) 

C***REVISICN  OCTOBER  1,  1980 
C*  **CATEGC3Y  NO.  B  5  F 

C*  **KE  XViCPD  (S)  IRICCMI-S,INCCPELETE  GAflfl  A  FUNCTION, 

C  GAMMA  FUNCTION,  SPECIAL  FUNCTION 
C*  **DAT E  Vi  8 ITT EN  JULY  1977 
C***AUIHOR  FULLERTON  H.  (IISI) 

C*  *  *?U  H?  CS  E 

C  CCMPU1ES  TEICCfU-S  FORM  Cf  THE  INCOMPLETE  GAS JA  FUNCTION. 
C***DESCRIPIICN 

C  JULY  1977  EDITION.  «.  F  UIL  EH  TON ,  C3,  LOS  ALAMOS  SCIENTIFIC  LAB. 

C 

C  EVALUATE  TRICOKI-S  INCOMPLETE  GAMMA  FUNCTION  DEFINED  BY 
C 

C  GAHIT  =  X**(-A)/GAEMA  (A)  *  INTEGRA  L  I  =  0  TO  X  CF  EXr(-T)  *  T**(A-1.) 
C 

C  AND  ANALYTIC  CONTINUATION  FCR  A  .LE.  0.0.  GAMMA  ( X)  IS  THE  COMPLETE 
C  GAMMA  FUNC1ION  OF  X.  GAFIT  IS  EVALUATED  FCH  ABBITBABI  REAL  VALUES  OF 
C  A  AND  FCR  NON-NEGATIVE  VAIUFS  OF  X  (EVEN  THOUGH  GAMII  IS  DEFINED  FOR 
C  X  .LT.  0.0),  EXCEPT  THAT  FCR  X  =  0  AND  A  .LE.  0.0,  GAMIT  IS  INFINITE, 
C  A  FATAL  ERRCR. 

C 

C  A  SLIGHT  DE I EBIORATI C  N  CF  2  OR  3  DIGIIS  ACCURACY  WILL  OCCUR  WHEN 

C  GAMIT  IS  VERY  LARGE  03  VERY  SMALL  IN  ABSOLUTE  VALUE,  bLCAUSE  LCG- 
C  ARITHNIC  VARIABLES  ARE  USFC.  ALSO,  IF  THE  PARAMETER  A  IS  VERY  CLOSE 
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C  TC  A  N  £  GAT  IV  E  INIEGER  (BUI  NOT  A  NEGATIVE  INTEGER),  THERE  IS  A  LOSS 
C  Of  ACCURACY,  WHICH  IS  REPORTED  IF  THE  RESULT  IS  LESS  THAN  HALF 
C  MACHINE  PRECISION. 

c 

C  HEP.  --  «.  GAUTSCHI,  AN  EVAIUATICN  PROCEDURE  FOR  INCOMPLETE  GAMMA 
C  FUNCTIONS,  ACM  TRANS.  MATE.  SOFTWARE. 

C 

C*  **RGUT  INES  CALLED  F.9LGIC,  X  ESC  LB  ,  AL  NS  AS  ,  H  9  LG  I  T  ,  B  9G  MI  I  ,  ALG  AMS  ,  G  AML, 

C  R1HACH 

DATA  ALNEPS, S£EFS,BCT  /  3*0.0  / 

IF  (ALN EPS. NE. C.O) GO  TC  1C 
ALNEPS  =  -ALOG  (  fi  1  MACH  (3) ) 

SQEPS=S;RT  (R  1MACH  (4)  ) 

E0T=ALC3  (H  1M  ACH  (  1)  ) 

10  IF  (X.L1.  0.  0)  PRINT  974 

974  f  0  F  M  A  T  ( '  *****  GA2IT X  IS  NEGATIVE') 

IF  (X.NE.0.0)  A  I  X=  ALOG  (X) 

SGA=1. 0 

IF  (A.N  E.  0.  0)  S  G A  =  SIG  N  (  1.  C,A) 

AI  NTA  =  AI  NT  (A  +  0.5*SGA) 

AEES=A-AINTA 

IF  (X.  GT.  0.  0)  GO  10  20 

GAR  11=0.0 

IF  (AINTA.GT. 0.0. OR. AEPS.NE.O. 0)GAMIT=G AMR  (A* 1 . 0} 

RETURN 

20  IF  (X.  GT.  1.  0)  GO  TO  4C 

IF  (A.GE.  (-0.  5)  .OR.  A  EPS.  M.Q.  0)  CALL  ALG  AMS  (A +1.  0,  ALGAP  1, 

1SGNGAM) 

GA  M IT=  H9GM IT  ( A , X , ALG A F 1 , SGNG A M , A  LX) 

RETURN 

40  IF  (A.LT.  X)  GO  TO  50 

1=391011  (A  ,X  ,  A  INGAM  (A*  1.0) ) 

GAM  IT=  EX?  (T) 

RETURN 

50  ALNG  =  39LGIC ( A , X, A  LX ) 

C 

C  EVALUATE  G  A  MI  I  IN  TERMS  CE  A  I CG  ( GA  M IC  (  A,  X )  ) 

C 

H=  1.0 

IF  (AEPS. EC . 0 . O.AND.AINTA.LE.O.  0) GO  TO  bO 
CAIL  ALG A3S( A*  1.0, AIGAf  1,SGNGAM) 

T  =  A  LOG  (ADS  (A)  )  ♦ALNG-AIGJE  1 
IF  (T.GT. ALNEPS) GO  TO  70 

IF  (T.GT.  (- ALN  EPS)  )  H=  1 .0 -S  G  A*S  G  NG  AM  *  EX  P  (I) 

IF  (ABS  (H).GT. S„E?S) GO  TC  60 
PRINT  975 

975  FORMAT  ('  *****  GAMIT...IT  HALF  PRECISION') 

60  T=-A*ALI*ALOG  (ADS  (II )  ) 

GAMIT=SIGN  (EXF  (T)  ,H) 

RETURN 

70  T=T-A* ALX 

GA  HIT  =  -SGA*3GNGAK*EXE  (T) 

RETURN 

END 

C 

C 

c 

FUNCTION  fi  9L  GMC  (  X) 

C 

C*  * *B E V I SION  OCTOBER  1.  198C 


C* **CATEGCBY  NO.  S5F 

C***KE  YWOBD  IS)  COBDECTION  FACTCE,LOG  G  AH  N  A,  S  P  ECIA  L  FUNCTION 
C*  • *  DATE  BRITTEN  AUGUST  1977 
C***A0THCR  FULLERTON  «.  (LASl) 

C***PUHPCSE 

C  COMPUTES  THE  LOG  GAMMA  CORRECTION  FACT CS  SO  THAT 

C  AIOG  (GAMMA  (X)  )  =  ALOG ( S  *BT  ( I  *PI)  )  ♦  (X- .  5)  *A  LOG  (X)  -  X  ♦  B9LGMC(X) 

C***DESCEIPIICN 

C  AUGUST  1977  EDITION.  V.  IUILE3T0N ,  C3,  LOS  ALAMOS  SCIENTIFIC  LAB. 

C 

C  CCHPDTE  THE  LOG  GAMMA  CCRfECTICN  FACT02  FOB  X  . GE-  1C.0  SO  THAT 
C  ALOG  (GAMMA  (X)  )  ^  ALOG  (SwRT  |2*PX)  }  ♦  (X-.  5)  *ALCG  (  X)  -  X  ♦  R  9  LG  NC  (X  ) 


C  SERIES  f 03  ALGM 
C  WITH  WEIGHTED  EERCP 
C  LCG  WEIGHTED  EES  0  R 


ON  THE  INTER  7A  L  O.TO  1.  00000C-02 
3. 4CE-  16 
15.  47 


C  SIGNIFICANT  FIGU2E3  RE*UIE£I  14.39 
C  DECIMAL  PLACES  BE^OIBEL  15.86 


C***30UIINES  CALLED  CSEV I, E 1  EACH, IN  ITS 
CIMENS  ION  AL  GMC5  (6) 

DATA  ALGMCS(  1)  /  .1*66389480  45186E0  / 

DATA  ALGMCSl  2)  /  -.0CC0133494  817606E0  / 

DATA  ALGMCSl  3)  /  .OCCOOOOOS8  108256E0  / 

DATA  ALGMCSl  4)  /  -.OCQOQOOOOO  180912E0  / 

DATA  A L GilCS (  5)  /  .OCCCOOOOQC  OOUb22EO  / 

DATA  ALGMCSl  6)  /  -.OCOOOOOOOO  000003E0  / 

DATA  N  AL  Gil ,  XEIG,  XMAX  /  0,  2*0.0  / 

IF  (NALGfl. NE.  0) GC  TO  10 
NALGM= IN  ITS ( A  L  GdCS  , 6  ,  F  1  MACH  (3)  ) 

X3IG=  1.0/S WET  (3  1MACH  (2)  ) 

Xfl  A  X  =  E  XP  (AMI  N  1  (ALOG  (E1MXCH  (2)  /  12.  0  )  ,  -  ALOG  { 1  2.  0*  B  1MACH  (1)  )  )  ) 
10  IF  (X.LT. 10.0) PEINT  976 

976  FORMATS  *****  E9LGMC _ X  MUST  BE  GE  10') 

IF (X.GE. XMAX) GC  TO  20 

R9  LGMC=  1. 0/(  1  2 . 0*  X) 

IF  (X.LT.  X3IG)  R9LGMC=C£EU  (2.  0*  (  1  C. /X)  **2-1 .  ,ALG  MCS,  NALGM) /I 
PETUBN 

20  E9LGMC=0.0 

PEINT  977 

977  FORMAT  (•  *****  E9LGMC....X  TOO  BIG,  UNDERFLOW • ) 

RETURN 

EN  C 


FU  NCTION  GAM  R  (X) 

C*  **RE  VI SICN  0CT03EP  1,  1980 
C*  * *CATEGQ 8Y  NO.  35F 

C*  **KETWCBD(S)  HECIPKCCAL  GAMMA  FUNC  TI  ON  ,G  A  KMA  FUNCTION  SPECIAL  FUNCTION 
C*  *  *DA  TE  WRITTEN  JULY  1977 
C»**AUTHOB  FULLERTON  W.  (LASI) 

C*  **PU  EPOS  E  COMPUTES  THE  B  EC  I  £  BOCAL  OF  THE  GAMMA  FUNCTION. 
C***DESCRIFIIGN 

C  JULY  1977  EDITION.  W.  FULLERTON,  C3,  LOS  ALAMOS  SCIENTIFIC  LAB. 

C  THIS  BCUTINE,  NOT  GAMMA  (X),  SHOULD  BE  THE  FUNDAMENTAL  ONE. 

C 

C* • *BOUT IN  ES  CALLED  ALGA  MS, XE3CLR, GAMMA , XSETP , XG ETF 
GA  8  ?  =  0 . 0 


V  V*/ 4+m  V  •/♦/  V  %“  ^  /  -/  v‘  .  *  ./  .  ■  ./  %  v 

■Cn'I-v'Cv'CvIv'CvIn'C 


v'v-y-.v'-: 

• .%  - s . 


DU  20  K=1,200 
FK  =K 

1E=-X*TE/FK 
T=  T  £/  ( A E  *FK) 

S=S*T 

IF (ABS (I) . LT. EPS*ABS (S) ) GC  T J  30 
20  CO  NT  IN UE 

PBIN1  979 

979  FOBMAT  ('  *****  R9GMIT....NO  CONVERGENCE  IN  200  TERMS') 

30  IF  (A.GE.  (-0.  5)  )  A LGS =- I 1 C A E 1 ♦ ALOG  (5) 

IF  (A.GE.  (-0.  5)  )  G C  IC  60 
ALGS=-ALNGAR  (  1.0*AEPS)  ♦  A  LOG  (S) 

S=  1.0 
M=-f!A-1 

IF  (M.  EC-  0)  GO  TO  50 
1=1.0 

DO  40  K  =  1,  M 

1=1*1/  (A  EPS- FLOAT  (fl*  1  -  K )  ) 

s=  s  *z 

IF  (ABS  (I)  .  LT.  EES*AB5  (£)  )  GC  TO  50 
40  CONTINUE 

50  89  GRIT  =  0.0 

ALG£=— FLOAT (  M  A) *ALOG  (I)  +  ALG5 
IF  (S.EC.O.  O.OE.  AE?i.  E*.C.O)GO  TO  60 
SGNG2=SGNGAM  *SIGN { 1. 0  ,  S ) 

ALG2=-X-ALGAP1*ALCG  (AES  (S) ) 

IF  (ALG2. GT.301)  R9GMI1  =  SGNG 2*EX?  (ALG 2) 

IF  (ALGS.  GT.BOT)  S9GMI1  =  G9G.1IT  ♦  EXP  (ALGS) 

BE  TUB  N 

60  B9GMIT  =  EX?  (ALGS) 

BE1UBN 

END 

C 

C 

C 

FUNCTION  ?9LG1I(A,X,AIGAP1) 

C*  **BE  VI SICN  OC ICSES  1,  1S8C 
C*  *  *C A  TE  GC  R  Y  NC.  B5F 

C***KEHCRC(S)  TRICOKI-S,  INCOFFLETE  GAMMA  F  U  NCTI 0  N,  LOG  A  HI  TH  a, 

C  PEPRON-S  CONTINUED  FR AC T  I  C t , S t EC I AL  FUNCTION 
C  *  *  *DA IE  KOI 1IEN  JUIY  1977 
C***AUTHCB  FULL  EP  TON  V.  JLASi) 

C*  **PURPCSE 

C  COMPOTES  TRE  LOG  CF  TSICOFI-S  INCOMPLETE  GAKMA  FUNCTION  BITH 
C  PEBRON-S  CONTINUED  FRACTION  FOR  LABGE  X  AND  FOB  A  .GE.  X. 

C***DESC  PIPTION 

C  JULY  1977  EDITION.  W.  FU1LEBTCN,  C3,  LOS  ALAMOS  SCIENTIFIC  LAB. 

C 

C  COMPOTE  THE  LOG  CF  18ICCFI-S  INCOMPLETE  GAMMA  FUNCTION  HHri  PEBRON-S 
C  CONTINUED  FRACTION  FOB  LABGE  X  AND  FOB  A  .GE.  X. 

C***aOOTINES  CALLED  R1MACH 

DATA  EPS,  EPS  /  2*0.0  / 

IF  (EPS.E2-0.0)  EPS  =  0 . 5  *B  1  MACH  (3) 

IF  (S^EPS. E2- 0.0)  SCEES  =  SQBT  (R 1M ACH  (4) ) 

IF  (X.LE.O.  O.OR.A.LT.  XJPFINT  960 

980  FG  RM  AT  ( '  *****  R9LGIT _ X  RUST  BE  GT  0.  LE  A') 

A  X  = A*  X 

A  1 X  =  AX ♦  1 . 0 

a=c.o 

p=  1.0 
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DO  20  K=  1,  20  J 
FK  =  K 

T=  ( A ♦ F  K )  *X*{  1.0*3) 

3=1/  (  (AX*F  K)  *  l  A11*Pf)  -T) 

P=R*P 
S=S*P 

IF  (A3S  (?)  .  LI.  EF3*S)  GC  TC  30 
CONTINUE 
P8INT  93  1 

F03EAT  ( •  *****  391,0  II....  NC  C0NVE30Ef.CE  IN  200  TERSS') 
HSTAR  =  1  .  O-i*  S/A1  X 
IF  (HSTAn.LT.  SCEPS)  PRINT  9E2 

FORMAT  ('  39  LG  I T _  LT  HALF  PRECISION') 

R9LGIT=-X-AL3 AP1-ALCG  (HSTA2) 

RETURN 
END 


FUNCTION  R9LGIC(A,X,AIX) 

C***REVISICN  OCTGBE3  1,  198C 
C*  **CATEGCBY  NO.  o5F 

C***KE  YWORD  (S)  LOG  AFITHfl,  CC  fPIEMENIARY  INCOMPLETE  GAMMA  FUttNCIION, 

C  SPECIAL  FUNCTION , LARGE  X 
C*  *  *DAT  E  H3ITTEN  JULY  1977 
C*  **A  OIH  CB  FULLE2TCN  N.  (WSI) 

C* *  *?U  HPOSE 

C  COMPOTES  THE  LOG  C CMFLE t E t T A E Y  INCOMPLETE  GAMMA  FUNCTION  FOB  LARGE 
C  X  AND  PCR  A  .  Lt.  X. 

C***D£SC RIFT  ION 

C  J  CL  Y  1977  EDITION.  V.  FOILIFTCN,  C3,  LOS  ALAMOS  SCIENTIFIC  LA  3. 

C 

C  COMPUTE  THE  LOG  COMPLEMENTARY  INCOMPLETE  GAMMA  FUNCTION  F CB  LARGE  X 
C  AND  FOB  A  .LE.  X. 

C*  •  *ROUT  IN  ES  CALLED  R  1M AC  il 
DA  TA  EPS  /0-  0/ 

IF  (EPS. E w. 0. 0) E?S  =  0. 5*3  1MACH  (3) 

XP  A  =  I*  1.  0- A 
XM  A  =  X-  1 . 0-  A 
R=0.  0 
P=  1.0 
S=P 

DO  10  K= 1 ,200 
FK=K 

1=FK*  (A-FK)  *  ( 1 . 0  ♦  R) 

B=-T/  (  (XMA+2  .  0*FK)  *  { XF A ♦ 2. 0 *F K) *T) 

P=  8*P 
S=  5*  P 

IF  (ABS  (P) . LT. £?S*S) GO  TC  20 
10  CONTINUE 

PRINT  983 

983  FORMAT!'  *****  B9LGIC....NO  CONVERGENCE  IN  200  TERMS') 

20  R9 LGIC =A *A LX ~ X ♦ A  LOG  (S/XIA) 

RETURN 

END 


FUNCTION  INITS  ICS,NCS,ETA) 


-  -  V,  -r.  ■ 


:  /.  *r 


C  •**RE  VI  SI  CN  CCTC3EB  1,  1980 
C*  ••CATEGORY  NO.  B5R 

C***KEYHCBD(S)  ORTHOGONAL  SERIES, INITIALIZE, SPECIAL  FUNCTION 
C*  *  *DA IE  BRITTEN  A  FBI L  1977 
C***AUTH08  FULLERTON  B.  |LASL ) 

C* ••PURPOSE 

C  INITIALISES  AN  ORTHOGONAL  S  f  3 IES  SO  THAT  IT  DEFINES  THE  NOflSEa 
C  OF  TEENS  TO  CA3SY  IN  THE  SERIES  TO  MEET  A  SPECIFIED  ER BOB. 
C***DESCRIPTIGN 

C  APRIL  1977  VERSION.  B.  FULIEBTON,  C3,  LOS  ALAMOS  SCIENTIFIC  LAB. 

C 

C  INITIALIZE  THE  uRlhOGONAI  S  I  F  I  ti  SO  THAT  INITS  IS  Ih£  NUH3E3  OF  TERMS 
C  NEEDED  TO  INSURE  THE  ER  30  R  IS  NO  LARGER  THAN  ETA.  CEDINARILY,  ETA 
C  BILL  BE  CHOSEN  TO  BE  ONE-TENTH  MACHINE  PRECISION. 

C 

C  INPUI  ARGUMENTS  — 

C  OS  ARRAY  OF  NOS  COEFFICIENTS  IN  AN  ORTHOGONAL  SERIES. 

C  NOS  NUMBER  OF  COEFFICIENTS  IN  OS. 

C  ETA  REQUEST Eo  ACCURACY  OF  SERIES. 

C 

Cl  KENS  ION  OS  (NOS) 

IF  (NCS.LI.  1)  FEINT  984 

984  FORMAT  ( '  *****  INITS . #  OF  COEFF  LT  1') 

EBR=0. 

DO  10  11=1, NOS 

1=  NCS  + 1-II 

EBR  =  EBn*ADS(OS  (I)  ) 

IF  (ER3.GT.  ETA)  GO  TO  2C 
10  CONTINUE 

20  IF  (I.EQ.NOS)  PRINT  9S5 

985  FO  H  MAT  ( '  ♦•**♦  INITS . ETA  MAY  EE  TOO  SMALL') 

IN  ITS*  I 
PET'JFN 
EN  C 
C 

c 

C 

FUNCTION  CSEVL  (X,CS,N) 

C*  *  *R  E  VI  SI  C  N  OCTOBER  1,  1  9  6  C 
C***CA1EGCRY  NO.  B5R 

C*  ••KEYWORD  (S)  CHEBYSHEV,  SPECIAL  F  U  NCTIO  N  ,F  N  LI  B 
C*  •  *DA  TE  B8I1IEN  AFRIL.1S77 
C  *  *  *A  UTH  OR  FULLERTON  W.  (IJSI) 

C*  ♦•PURPOSE 

C  EVALUATE  THE  N-TEEM  CHFIYSHEV  SERIES  CS  AT  X. 

C***DESCRIPIICN 

C  APRIL  1977  VERSION.  W .  FULLERTON,  C-3,  LOS  ALAMOS  SCIENTIFIC  LABCRATOR 
C  INSTALLED  CN  THE  VAX  BY  CCLCEES  MONTANO,  C-3,  5/80. 

C 

C  EVALUATE  THE  N-TEBN  CHEEYSHIV  SERIES  CS  AT  X.  A  LAP  IEC  TiUA 
C  R  EROUCKE,  ALGORITHM  446,  C.A.C.M.,  1b,  254  (1973).  ALSO  SEE  FOX 

C  AND  PARKE3,  CHEoYSHEV  PCIYS  IN  NUMERICAL  ANALYSIS,  OXFORD  PRESS,  E.  5b. 
C 

C  INPUT  ARGUMENTS  — 

C  X  VALUE  AT  WHICH  THE  SERIES  IS  TO  BE  EVALUATED. 

C  CS  ARRAY  CF  H  TERMS  OF  I  CHEEYSHIV  SESIES.  IN  EV  AL- 

C  U  AT  IN  G  CS,  ONLY  HALF  TEE  FIRST  COEF  IS  SUMMED. 

C  M  NOtBER  CF  TEEBS  IN  I F  B  { Y  CS. 

C 


DI  B  E  NS  10  N  CS  (1) 


n  n  r> 


C  SHERE  0  .IE.  X(I)  .  LT.  A  FOE  1=0,  ...,S-1. 

C  I1KACH(  7)  =  A,  THE  BA  EE. 

C  I1MACH{  8)  =  S,  THE  NUMBER  OF  BASE-A  DIGITS. 

C  I  13  ACH (  9)  =  A**S  -  1,  TEE  LA2GEST  HAG  El TODE. 

C 

C  FLOAT  IN G- POINT  NUMBERS. 

C  ASSUME  FLOATING-POINT  FUFEERS  ABE  BEPBESENTEC  IN  THE  T-DIGIT 
C  BASE-B  FOBM 

C  SIGN  (B**E)«(  (X  ( 1 J  /  B)  ♦  ...  ♦  (X(1)/B**T)  ) 

C  WHERE  0  .LE.  X|I)  .  LT.  B  FOR  1  =  1, ...,T, 

C  0  .LT.  X(1),  AND  EMIN  -LE.  E  .LE.  EHAX. 

C  IIHACH(IO)  =  b,  THE  EASE. 

C 

C  SINGLE-PBECISIO N 

C  I  111  ACH  (11)  =  T,  THE  NUMBER  OF  BASE-b  DIGITS. 

C  I  1M  ACH  (12)  =  EMIN,  THE  SMALLEST  EXPONENT  E. 

C  I  13  ACH  l  1 3)  =  £3  AX ,  THE  LARGEST  EXPONENT  £. 

C 

C  COO  EL  E-P 8  EC  IS  10  N 

C  I1SACH(14)  =  T,  THE  NUMBIF  OF  BASE-E  DIGITS. 

C  I  in  ACH  C  1 5)  =  EMIN,  THE  SMALLEST  EXPONENT  E. 

C  I  1M ACH  (16)  =  EMAX,  I H £  LABGEST  EXPONENT  E. 

C 

INIEGER  IMACH  (16)  ,0UTIU1 
EQUIVALENCE  (  IKACH  (4) , OUTPUT) 

MACHINE  CONSTANTS  FOB  TF.E  IBM  3033  AT  CLEMSCN  UNIVERSITY. 

DATA  IMACH  (  1)  /  5  / 

DATA  IMACH  (  2)  /  6  / 

DATA  I M  A  C  H  (  3)  /  2  / 

DATA  IMACH  (  4)  /  3  / 

DATA  IMACH (  5)  /  32  / 

DATA  IMACH  (  6)  /  4  / 

DATA  IKACH (  7)  /  2  / 

DATA  I  MACH  (  8)  /  3  1/ 

LATA  IMACH (  9)  /  Z7EFIFEFF  / 

DATA  IMACH  (1  0)  /  16  / 

DATA  1 3 A C H ( 1  1 )  /  6  / 

DATA  I  MACH  (12)  /  -64  / 

DATA  IMACH  (13)  /  63  / 

DATA  IMACH  (14)  /  14  / 

DATA  IMACH  (15)  /  -64  / 

DATA  IMACH  (16)  /  63  / 

IF  (I. LT.  1. OS. I. GT.  16)  GO  TO  10 
II  M ACH -1  MACH  (I) 

RETURN 
10  H2I1E (OUTPUT  ,9000) 

9000  FORMAT  ('  ERROR  1  IN  I  IMACH  -  I  OOT  OF  BOUNDS') 

RETURN 

END 

//GO.F103P001  DD  D 3 N=QMGU L I. CUT FUT , D IS P=SHR 
//GC.SYSIN  DD  * 
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ANALYSIS  OF  AIR  FORCE  VEHICLE  CONDITION  RATINGS  FROM  HISTORICAL  DATA 


ABSTRACT 

The  method  used  by  the  U.S.  Air  Force  to  record  historical  information  on  the 
use,  maintenance  and  repair  needs  of  their  vehicles  is  the  Vehicle  Information 
Management  System  (VIMS).  A  large  number  of  data  elements  are  recorded  daily 
and  compiled  monthly  for  most  every  vehicle  at  each  Air  Force  base  around  the 
world.  One  factor  that  is  assigned  monthly  to  each  vehicle  on  the  basis  of 
current  information  is  the  vehicles  condition  rating  known  as  the  Replacement 
Code.  Its  primary  determinants  are  age.  accumulated  use,  and  the  cost  of  a  one¬ 
time  repair  if  it  is  needed.  As  a  vehicle's  age,  use  and  repair  needs  indicate  a 
decline  in  its  operational  reliability,  the  condition  rating  of  the  vehicle  is 
successively  downgraded  through  a  sequence  of  alphabetic  replacement  codes,  the 
specifics  of  which  will  be  further  described  in  later  sections. 

The  replacement  code  is  the  primary  indicator  to  a  vehicle  fleet  manager  and 
base-level  command  of  the  need  for  new  vehicle  procurements.  As  such,  the  use 
of  this  rating  as  a  guideline  for  vehicle  buy  allocations  has  a  direct  impact  on 
both  the  cost  and  functional  capability  of  base  fleets.  Considering  that  the  Air 
Force  owns  and  operates  over  100,000  vehicles  of  roughly  330  different  types  at 
both  major  and  minor  installations  around  the  world,  it  is  important  that  the 
replacement  code  be  a  valid  measure  of  a  vehicle's  condition  and  anticipated 
performance.  The  purpose  of  this  research  was  to  assess  the  economic  validity 
of  the  replacement  code  as  a  repair  or  replace  indicator,  and  to  evaluate  the 
sensitivity  of  repair  or  replace  decisions  to  possible  changes  in  its  calculation. 
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ANALYSIS  OF  AIR  FORCE  VEHICLE  CONDITION  RATINGS  FROM  HISTORICAL  DATA 


1  Introduction 
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Effective  vehicle  monitoring  systems  are  necessary  to  track  the  use,  maintenance 
and  condition  of  a  vehicle  fleet.  These  systems  can  also  be  used  to  assist 
vehicle  fleet  managers  in  forecasting  inventory  needs  for  new  vehicles  and  parts. 
The  reliability  of  such  forecasts  will  have  significant  impacts  on  vehicle  buy 
decisions  and  the  accuracy  of  capability  assessments.  Since  the  condition  of  a 
vehicle  is  often  a  prime  determinant  in  how  it  is  used,  maintained  and  repaired, 
and  when  it  is  scheduled  to  be  replaced,  the  useful  life  of  a  vehicle,  from 
procurement  to  salvage,  is  affected  by  both  its  actual  and  rated  conditions. 
Examples  of  equipment  maintenance  and  replacement  research  are  [2,5,12,13,14]. 

The  method  used  by  the  U.S.  Air  Force  to  record  historical  information  on  the 
use,  maintenance  and  repair  needs  of  their  vehicles  is  the  Vehicle  Information 
Management  System  (VIMS).  A  large  number  of  data  elements  are  recorded  daily 
and  compiled  monthly  for  most  every  vehicle  at  each  Air  Force  base  around  the 
world.  One  factor  that  is  assigned  monthly  to  each  vehicle  on  the  basis  of 
current  information  is  the  vehicle's  condition  rating  known  as  the  Replacement 
Code.  Its  primary  determinants  are  age,  accumulated  use,  and  the  cost  of  a  one¬ 
time  repair  if  it  is  needed.  As  a  vehicle's  age,  use  and  repair  needs  indicate  a 
decline  m  its  operational  reliability,  the  condition  rating  of  the  vehicle  is 
successively  downgraded  through  a  sequence  of  alphabetic  replacement  codes,  the 
specifics  of  which  will  be  further  described  in  later  sections. 

The  replacement  code  is  the  primary  indicator  to  a  vehicle  fleet  manager  and 
base-level  command  of  the  need  for  new  vehicle  procurements.  As  such,  the  use 
of  this  rating  as  a  guideline  for  vehicle  buy  allocations  has  a  direct  impact  on 
both  the  cost  and  functional  capability  of  base  fleets.  Considering  that  the  Air 
Force  owns  and  operates  over  100,000  vehicles  of  roughly  330  different  types  at 
both  major  and  minor  installations  around  the  world,  it  is  important  that  the 
replacement  code  be  a  valid  measure  of  a  vehicle's  condition  and  anticipated 
performance. 
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From  May  through  July  of  1984.  this  researcher  worked  with  the  USAF  at  the 
Logistics  Management  Center  at  Gunter  AFS.  The  objective  of  that  research  was 
to  develop  a  prototype  vehicle  fleet  analysis  system  for  the  Zenith  Z-100  micro¬ 
computer  that  could  retrieve  and  utilize  VIMS  data.  During  that  10-week  research 
engagement,  we  identified  several  potential  difficulties  with  the  replacement  code 
as  a  single  measure  of  a  vehicle's  condition,  reliability,  expected  future 
performance  and  economic  value.  Several  needs  for  further  research  to  evaluate 
and  recommend  improvements  to  the  design  and/or  use  of  the  vehicle  replacement 
code  were  identified. 

The  purpose  of  this  research  was  to  assess  the  economic  validity  of  the 
replacement  code  as  a  repair  or  replace  indicator,  and  to  evaluate  the  sensitivity 
of  repair  or  replace  decisions  to  possible  changes  in  its  calculation.  Since  the 
replacement  code  is  meant  to  be  a  reliable  measure  of  a  vehicle's  present 
condition,  this  indicator  should  react  to  significant  changes  in  a  vehicle’s  current 
performance,  but  not  to  incidental  repair  needs  or  small  variations  in  other 
operational  costs.  An  explanation  of  the  replacement  code  is  given  first  that 
clarifies  the  successive  ordering  of  these  alphabetic  ratings.  Then,  a  description 
and  analysis  of  the  one-time  repair  limit  —  a  key  factor  in  the  determination  of  a 
vehicle's  replacement  code  —  compares  it  to  the  calculated  salvage  value  of  a 
vehicle  based  upon  engineering  economic  principles. 

The  importance  of  accounting  for  price  changes  in  a  one-time  repair  limit  is 
discussed,  and  it  is  shown  that  price  changes  are  accounted  for  in  VIMS  by 
adjustments  to  a  vehicle's  standard  price.  However,  the  analysis  of  VIMS  data  in 
this  study  revealed  that  these  adjustments  to  standard  prices  appear  to  be  very 
inconsistent.  Hence,  a  specific  recommendation  of  this  study  is  to  examine 
whether  changes  in  suppliers'  prices  are  being  properly  updated  and  utilized  within 
VIMS  for  calculating  one-time  repair  limits.  Section  6  explains  how  data  was 
retrieved  from  a  VIMS  historical  record  file  for  a  particular  base  and  organized 
into  a  usable  dataset.  Section  7  then  examines  the  impact  that  small  price 
adjustments  to  the  one-time  repair  limit  might  have  on  the  number  of  vehicles 
exceeding  this  limit.  Section  8  concludes  this  report  with  a  summary  and 
recommendations. 
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2  Review  of  the  Air  Force  Vehicle  Replacement  Code 
The  Replacement  Code  t RC)  is  updated  and  recorded  monthly  for  each  vehicle  of 
a  base  fleet  m  the  monthly  historical  record  file  of  the  Vehicle  information 
Management  System  (VIMS).  These  records  are  usually  maintained  on  a  current 
VIMS  tape  for  the  most  recent  12  months.  A  large  number  of  data  items  are 
recorded  to  this  database,  but  only  a  select  few  pertain  to  the  determination  of 
the  replacement  code.  A  necessary  t as*<  m  the  data  analysis  portion  of  this 
research  was  to  retrieve  the  following  selected  data  elements  from  the  VIMS  tape 
for  a  given  base  and  place  these  into  a  manageable  database. 

1.  Vehicle  Registration  Number  (VRN! 

2.  Management  Code  (MC) 

3.  Vehicle  Equivalents  (VEQ) 

4.  Acceptance  Date  (AD) 

5.  Standard  Price  ( SP) 

6.  Replacement  Code  (RC) 

7.  Life  Expectancy  <LE) 

8.  One-Time  Repair  Cost  Limit  (OTL) 

9.  One-Time  Repair  Cost  Exceeded  <OTX) 

10.  One-Time  Repair  Cost  Price  (OTP) 

1 1.  Use  Code  < UC) 

12.  Average  Daily  Use  (ADU) 

13.  Commutative  Use  (CU) 

14.  Direct  Labor  Cost  for  Repairs  (DLC! 

15.  Total  Parts  Cost  for  Repairs  <TPC) 

Details  pertaining  to  the  retrieval  of  this  data  from  the  VIMS  data  file  are 
discussed  in  a  later  section. 

The  vehicle  replacement  code  is  primarily  a  function  of  upon  three  basic  criteria 
--  age.  use  and  one-time  repair.  The  age  of  a  vehicle  can  be  calculated  from  its 
Acceptance  Date  (AD),  which  is  the  date  at  which  the  vehicle  was  actually 
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delivered  to  a  base  by  its  supplier.  Both  month  and  year  are  recorded  m  the 
acceptance  date.  The  year  of  the  acceptance  date  usually  agrees  with  a  vehicle's 
model  year,  which  is  the  first  two  digits  of  as  Vehicle  Registration  Number  (VRN). 

A  vehicle's  AD  year  can  easily  be  one  year  later  than  the  model  year  in  cases 
where  a  late  year  purchase  carries  the  acceptance  date  into  the  following  year.  In 
a  few  instances,  however,  the  AD  year  can  be  very  different  from  the  MY  if  a 

vehicle  has  been  depot  repaired  or  reassigned  to  a  completely  different  base.  An 

analysis  of  VIMS  data  showed  that  the  one-time  repair  limit,  which  will  be 
explained  later,  is  always  computed  on  the  basis  of  the  acceptance  date,  even 
whan  it  differs  from  the  model  year  substantially. 

The  use  of  a  vehicle  can  be  recorded  in  terms  of  four  different  units  —  miles 

(M),  hours  (H),  units  (U)  and  kilometers  (K).  A  vehicle's  Use  Code  (UC)  indicates  the 

particular  units  in  which  the  Cummulated  Use  (CU)  and  the  Average  Daily  Use 

iADU)  of  that  vehicle  were  recorded.  A  vehicle's  use  is  always  measured  in  units 
that  are  consistent  with  the  Average  Annual  Standard  specified  in  the  Air  Force 
77-310  Motor  Vehicle  Management  Manual  [6],  or  Technical  Order  36A-1-1301  [8], 
if  one  is  available  for  that  particular  vehicle  type. 

In  assigning  a  replacement  code  to  a  particular  vehicle,  both  the  age  and  use  of 
the  vehicle  are  compared  against  their  expected  lifetime  values.  The  Life 

Expectancy  (LE)  of  a  vehicle  is  given  m  years  as  one  of  the  data  elements  in  the 
VIMS  historical  record  file.  The  lifetime  expected  use  (LEU)  of  a  vehicle  equals 

the  life  expectancy  of  the  vehicle  times  as  average  Annual  Use  Standard  (AUS), 

where  LEU  =  LE  *  AUS.  Unfortunately,  the  annual  use  standard  for  each  vehicle  is 
not  recorded  as  a  data  element  in  the  VIMS  historical  record  file.  This  omission 
makes  it  very  awkward  to  associate  the  correct  AUS  values  in  AFM  77-310  with 
the  vehicles  found  m  a  VIMS  historical  record  file. 

Section  V  of  Technical  Order  00-25-249  [7]  on  Vehicle  Replacement  Codes 

contains  descriptions  of  the  replacement  codes  as  listed  in  Table  1.  Some 
wording  changes,  particularly  the  replacement  of  Miles/Kilometers  with  Use,  have 
been  made  for  consistency.  It  is  unclear  in  TO  00-25-249  whether  the  Use 
criterion  is  ever  used  to  determine  the  replacement  codes  of  vehicles  fo  which 


Tabic  1:  Vehicle  Replacement  Codes 


'he  following  desorptions  are  found  in  Section  V  of  TO  00-25-249  See 
36A- 1-1301  for  venicie  life  expectancies  and  lifetime  expected  use  standards,  ana  a 
77-310  for  additional  information. 

Abbreviations  used  are  LE  =  life  expectancy  im  yearsi.  LEU  =  lifetime  expected  use 
M,  H/U/K);  OTL  =  one-time  repair  limit  tin  dollars). 

1  A  -  Age,  Use  and  One-Time  Repair  Vehicle  has  exceeded  both  its  LE  and 
LEU;  also  requires  repairs  that  would  exceed  its  OTL.  and  the  vehicle  repair 
authority  has  decided  that  only  minimum  essential  repairs  will  be  made. 

2.  8  -  Age  and  One-Time  Repair  Vehicle  has  exceeded  its  LE.  also  requires 
repairs  that  would  exceed  its  OTl.  and  it  has  been  decided  that  only  minimum 
essential  repairs  will  be  made. 

3  C  -  Use  and  One-Time  Repair  Vehicle  has  exceeded  its  LEU.  also  requires 
repairs  that  would  exceed  its  OTL,  and  it  has  been  decided  that  only  minimum 
essential  repairs  will  be  made. 

4  D  -  One-Time  Repair  Vehicle  requires  repairs  that  would  exceed  its  OTL 
and  it  has  oeen  decided  that  only  minimum  essential  repairs  will  be  made. 

5  F  -  Obsolete  Vehicle  has  been  declared  obsolete.  Vehicle  maintenance  wnl 
manually  enter  this  code  into  VIMS  upon  notification 

6  G  -  Age  and  Use  Both  LE  and  LEU  have  been  exceeded. 

7  H  -  Age.  Life  expectancy  has  been  exceeded. 

3  J  -  Use.  Lifetime  expected  use  has  been  exceeded. 

9  K  -  Age  and  Use.  1  Year  Both  LE  and  LEU  will  be  exceeded  within  1  year 

10  L  -  Age.  1  Year  Life  expectancy  will  be  exceeded  within  one  vear 

11  M  -  Use.  1  Year  L.fetime  expected  use  will  be  exceeded  within  one  year 

12  N  -  Age  and  Use.  2  Years.  Both  LE  and  LEU  will  be  exceeded  within  2 
years 

13  P  -  Age.  2  Years  Life  expectancy  will  be  exceeded  within  two  years. 

14  Q  -  Use.  2  Years  Lifetime  expected  use  will  be  exceeded  within  two  years. 

15  R  -  Age.  Mid-Life  Vehicles  age  has  exceeded  one-half  of  its  LE 

'6  S  -  Depot  Repaired  Vehicles  Vehicle  was  depot  repaired  less  than  3  years 

ago.  see  paragrapn  5-22  for  further  instructions. 

17  T  -  Other  Assign  to  vehicles  whenever  codes  A-S  or  U  do  not  apply 

18  U  -  Warranty  Assign  to  vehicles  under  new  or  remanufacture  warranty;  does 

not  apply  to  depot  repaired  vehicles. 


Table  2:  Replacement  Code  Criteria 
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replacement  cede 
age  of  vehicle  (m  years), 
cummulated  use  (in  M/H/U/K) . 
one-time  repair  limit  (in  dollars). 

zero  life  expectancy  or  lifetime  expected  use  remaining. 

1  yr  I*  *6  "  •*  ••  «  «»  n 

2  yr  life  "  ”  ••  "  "  " 

half  life  expectancy  or  lifetime  expected  use  remaining, 
vehicle  under  warranty  (essential'/  full  life  remaining)  . 

vehicle  depot  repaired  less  than  3  years  age. 
vehicle  declared  obsolete. 

=  whenever  codes  A-S  or  U  do  not  apply. 
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use  is  measured  m  hours.  Nevertheless,  it  is  easier  to  comprehend  the  successive 
nature  of  these  replacement  codes  by  observing  their  common  criteria  as  shown 
Tapie  2.  wnere  an  X'  indicates  that  the  criterion  in  a  given  column  applies  to  the 
replacement  code  m  a  given  row. 

The  replacement  codes  listed  in  Tables  1  and  2  are  mutually  exclusive,  since  all 
criteria  for  any  one  replacement  code  must  be  met  simultaneously.  It  is  also 
explained  in  TO  00-25-249  that  sending  a  vehicle  to  Depot  Repair  will  revert  its 
replacement  code  from  a  letter  below  L,  back  up  to  the  letter  S,  and  then  down  to 
P.  For  this  reason,  all  vehicles  with  replacement  codes  F,  S  and  T  must  be  treated 
as  special  cases.  Obsolete  and  Other  are  two  additional  catagories  used  for 
venicles  with  special  circumstances  that  nullify  the  standard  criteria. 

The  time  variables  ZL.  IV.  2Y,  and  HL  shown  in  Table  2  can  apply  to  either  the 
life  expectancy  or  the  lifetime  expected  use  of  a  vehicle,  as  is  suggested  by  the 
assignment  rules  for  the  replacement  codes.  In  terms  of  life  expectancy,  ZL  'or 
zero  life  remaining)  implies  that  the  age  of  the  vehicle  as  measured  from  its 
acceptance  date  has  exceeded  the  life  expectancy  of  the  vehicle.  In  comparison, 
ZL  in  terms  of  LEU  implies  that  the  cummulated  use  of  the  vehicle  has  exceeded 
its  iifetime  expected  use.  Life  expectancies  (in  years)  and  lifetime  expected  use 
standards  are  specified  in  TO  36A-1-1301  and  AFM  77-310  as  mentioned  above. 

Times  at  which  a  vehicle  has  less  than  one  year,  two  years  or  half  of  ts  ‘e 
expectancy  remaining  are  directly  apparent  from  the  vehicle  s  age  and  L5  .aues 
is  also  clear  as  to  when  a  vehicle's  current  CU  has  exceeded  half  c*  ts 
However,  it  is  unclear  as  to  when  a  vehicle  is  said  to  have  less  tnan  c~e 
/ears  of  its  LEU  remaining,  since  this  could  be  based  e  tner  on  *-e 
annual  use  standard  (AUS)  or  upon  its  own  average  anruai  ^se 
accurate  to  classify  a  vehicle  as  being  within  one  .ear  ■*  -s  _i 
difference  between  its  LEU  and  CU  values  is  less  than  -s  a.**  * 

as  compared  to  simply  being  within  one  AUS  of  its  ^E^ 

Within  the  time  variable  columns  of  TaD'e  2.  a 
ana  upward  as  it  gefs  older.  its  transition  a-  • 


t 


depends,  however,  upon  how  intense  , 
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less  than  its  AGE  times  its  AUS.  then  it  will  be  assigned  codes  R.  P.  L,  H.  B  and 
possibly  A  throughout  its  lifetime.  If  a  vehicle's  use  is  continually  greater  than 
its  AGE  times  its  AUS.  then  it  will  be  assigned  codes  Q.  M,  J.  C  and  possibly  A 
throughout  its  lifetime.  A  vehicle  whose  use  follows  the  prescribed  AUS  fairly 
closely  year  after  year  will  probably  be  assigned  codes  R,  N,  K,  G  and  possibly  A 
during  its  lifetime. 


The  procedure  by  which  a  vehicle's  average  annual  use  standard  is  estimated  is 


not  investigated  in  this  research.  This  value  depends  upon  the  fleet  size  needed 
at  an  Air  Force  base  in  order  to  cover  all  assigned  functions,  and  the  intensity  of 
use  that  a  vehicle  receives  on  these  assignments.  The  determination  of  an 


optimal  fleet  size  involves  many  factors  including  the  charcteristics  of  daily 


demands  for  those  vehicles,  their  reliabilibity,  and  their  critical  need  in  the  event 


of  an  emergency  response.  As  a  rule,  it  is  more  costly  to  operate  a  fleet  size  in 
excess  of  the  number  of  vehicles  required  to  cover  all  functions  with  adequate 


allowance  for  out-of-commission  vehicles. 


It  is  assumed  in  this  research  that  the  annual  use  standards  estimated  by  the  Air 
Force  for  its  vehicles  correctly  reflect  the  trade-offs  between  fleet  size  cost  and 
preparedness  in  that  organization.  However,  the  tremendous  variety  of  Air  Force 
base  locations  and  operating  conditions  does  introduce  some  doubt  as  to  whether 
a  single  use  standard  is  appropriate  for  the  same  vehicle  type  at  all  installations. 
It  is  recognized  here  that  a  strong  need  for  policy  standardization  within  the  Air 
Force  does  require  that  certain  simplifying  assumptions  be  made  that  lead  to 
uniform  management  directives.  Moreover,  an  analysis  of  how  operating 
conditions,  maintenance  procedures  and  usage  intensity  affect  the  useful  life  of 
Air  Force  vehicles  is  beyond  the  scope  of  this  research. 


The  life  expectancy  of  a  vehicle  and  its  lifetime  expected  use  are  both  dependent 
upon  the  average  annual  use  of  the  vehicle  and  its  economical  time  of 
replacement.  Given  that  the  average  annual  use  of  a  vehicle  is  taken  to  be  known 
and  fixed,  as  opposed  to  being  determined  simultaneously  with  the  vehicle's 


optimal  replacement  age.  the  optimal  replacement  time  of  a  vehicle  can  be 


determined  theoretically  on  the  basis  of  its  expected  operations  and  maintenance 


costs.  Unfortunately,  there  is  insufficient  data  in  one  12-month  VIMS  dataset  with 
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which  to  estimate  the  optimal  replacment  age,  or  useful  life  expectancy,  of  any 
given  vehicle  type. 

Alternatively,  the  One-Time  Repair  Limit  (OTL)  that  is  updated  monthly  in  the 
VIMS  records  can  be  examined  on  the  basis  of  available  data,  and  it's  calculation 
can  be  modified  to  better  reflect  the  current  economic  value  of  a  vehicle.  In  the 
next  section  of  this  report  is  explained  the  current  procedure  used  by  the  Air 
Force  to  calculate  a  vehicle's  one-time  repair  limit.  Section  4  shows  that  the 
current  formula  is  similar  to,  but  consistently  higher  than,  an  alternative  calculation 
of  OTL  based  upon  engineering  economic  calculations  of  a  vehicle's  salvage  value. 

3  Explanation  of  the  One-Time  Vehicle  Repair  Limit 

Currently,  the  One-Time  Repair  Limit  (OTL)  is  primarily  an  indicator  of  age  and 
use.  It  does  not  reflect  the  expected  operation  and  maintenance  expenses  of  that 
particular  vehicle  type  in  future  years.  TO  00-25-249  specifies  that  OTL  for  a 
given  vehicle  should  be  calculated  on  the  basis  of  two  different  but  related  ratios. 
One  formula  uses  AGE/LE  ratio,  while  the  other  formula  uses  the  CU/LEU  ratio. 
Otherwise,  both  formulas,  as  shown  by  equations  (1)  and  (2),  are  identical. 


OTL, 

*  SP*<1  -  0.9*AGE/LE) 

for  AGE  <*  LE 

(1) 

OTL, 

«  SP*<0.1) 

for  AGE  >  LE 

OTL_ 

-  SP-<1  -  0.9-CU/LEU) 

for  CU  <«  LEU 

(2) 

OTL2 

*  SP»<0.1) 

for  CU  >  LEU 

OTL  *  Mm  [OTL,.  OTL.,: 

13) 

where.  SP  *  Standard  Price  (of  a  new  vehicle,  in  dollars) 

AGE  *  Current  Date  -  Acceptance  Date  (in  months) 

LE  *  Life  Expectancy  (in  months) 

CU  *  Cummulated  Use  <m  M/H/u/K  units) 

LEU  *  Lifetime  Expected  Use  <m  M'H/U/K  units) 

in  the  above  formulas.  lE  is  multiplied  by  12  to  convert  it  to  months,  and  LEU 
equals  LE  'm  years)  times  the  annual  use  standard.  After  calculating  both  OTL, 
and  OTL2.  the  lower  of  the  two  is  taken  as  the  OTL  for  that  vehicle  m  that  month 
as  given  by  equation  < 3). 


Figure  1  shows  the  OTL  values  for  a  hypothetical  vehicle  with  a  standard  has  a 
standard  price  of  S  10.000  and  a  life  expectancy  of  10  years.  It  is  very 
straightforward  to  calculate  OTL,  for  any  vehicle  on  the  basis  of  its  life 
expectancy  and  its  age  calculated  from  VIMS  records.  On  a  graph  such  as  Figure 
1.  OTLi  can  be  drawn  as  a  line  connecting  the  standard  price  at  time  0  to  10%  of 
the  SP  at  time  LE.  For  vehicie  ages  beyond  LE.  OTL1  is  set  to  10%  of  the 
standard  price,  as  given  by  equation  (1>  and  shown  by  the  values  for  OTL,  in 
Table  3. 

By  comparison.  OTL2  is  a  function  of  a  vehicle's  use,  and  it  will  not  be  straight 
line  unless  the  vehicle  receives  the  identical  amount  of  use  in  every  month. 
Moreover,  it  is  not  possible  to  calculate  OTL2  directly  from  VIMS  data  because 
the  annual  use  standard  for  each  vehicle  type  is  not  included  in  the  VIMS  dataset. 
The  graph  of  OTL2  shown  in  Figure  1  is  based  on  hypothetical  use  data  for  this 
example  vehicle  shown  m  Table  3.  Note  that  in  Figure  1,  OTl_2  is  always  greater 
than  or  equal  to  OTL,.  Only  at  times  when  the  total  cummulated  use  of  a  vehicle 
exceeds  its  age  times  its  annual  use  standard  will  OTI_2  will  be  lower  than  OTL,. 
Otherwise,  OTL,  will  always  be  lower,  which  was  found  to  be  the  case  for  all 
vehicle  records  examined  m  this  study  for  one  particular  base. 


As  explained  m  the  next  section,  the  reasoning  behind  a  one-time  repair  limit  is 
that  it  reflects  the  salvage  value  of  a  vehicle  at  that  time.  One  implication  of 
usmg  the  above  formulas  to  determine  the  one-time  repair  limit  is  that  the  salvage 
value  of  a  vehicle,  no  matter  how  old.  is  assumed  to  be  atleast  10%  of  its 
standard  price,  whicn  is  a  common  rule  for  equipment  depreciation  accounting  [4], 
A  maintenance  related  reason  for  the  10%  minimum  is.  however,  that  it  insures  the 
allowance  of  minimal  reoairs  to  vehicles  that  are  needed  and  are  still  operational 
past  their  exoected  lifetimes.  Otherwise,  a  very  usable  vehicle  could  be  left  out- 
of-commission  oecause  of  needing  relatively  inexpensive  repairs. 

4  Alternative  Calculation  of  the  One-Time  Repair  Limit 

"he  purpose  of  sett.ng  one-time  repair  limits  on  vehicles  s  to  potentiaiiv  avoid 
uneconomical  'eoair  e«oenai’ures  on  a  vehicle  beyond  its  salvage  value.  The 
caicuiat  on  :>f  saivaqe  value  'or  a  given  vehicle  >n  a  given  /ear  requires  'hat  the 
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Table  3:  Calculations  of  OTL  ?  and  OTL2 


Listed  below  are  values  of  annual  and  cummulated  use  for 
a  hypothetical  vehicle  with  a  standard  price  of  $10000. 


Annual 

Total 

0TL2 

0TL1 

OTL 

Niles 

Niles 

Dollars 

Dollars 

Dollars 

5000 

5000 

9437.5 

9100.0 

9100.0 

7000 

12000 

8650.0 

8200.0 

8200.0 

9000 

21000 

7637.5 

7300.0 

7300.0 

11000 

32000 

6400.0 

6400.0 

6400 . 0 

10000 

42000 

5275.0 

5500.0 

5275.0 

9500 

51500 

4206.3 

4600.0 

4206.3 

8500 

60C00 

3250.0 

3700.0 

32SO.O 

7500 

67500 

2406.3 

2800.0 

2406.3 

6500 

74000 

1675.0 

1900.0 

1675.0 

6000 

80000 

1000.0 

1000.0 

1000.0 

0 

80000 

1000.0 

1000.0 

1000.0 

0 

80000 

1000.0 

1000.0 

1000.0 

vehic le 

In  this 

example,  AUS 

•  8000  ml/yr 

and  LE 
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principles  of  life  cycle  costing  be  applied  correctly.  Textbooks  such  as  [3]  and 
[11]  explain  the  engineering  economic  principles  that  are  the  basis  for  present 
value  and  uniform  annual  value  calculations  used  in  life  cycle  costing  and 
replacement  scheduling  of  transit  equipment  [1,9,10]. 

The  calculation  of  a  one-time  repair  limit  based  upon  engineering  economics  is 
equivalent  to  determining  the  salvage  value  of  the  vehicle  in  any  period.  Data 
required  to  make  this  calculation  are  the  vehicle's  original  purchase  price  or 
standard  price,  its  expected  operation  and  maintenance  cost  in  each  period,  and  an 
appropriate  discount  rate  or  oppurtunity  cost  of  capital  for  the  equipment  owning 
organization.  If  inflation  is  accounted  for  within  the  analysis,  then  the  cash  flows 
m  this  stream  can  be  expressed  m  currant  dollars  at  time  0  or  in  "then-current" 
dollars  for  each  of  the  time  periods.  Accounting  for  inflation  requires  that  a 
suitable  equipment  cost  price  index  be  available  for  the  analysis  period. 

The  final  key  assumptions  to  the  calculation  of  a  vehicles  salvage  value  based 
upon  engineering  economics  are  that: 

1.  This  vehicle  can  be  replaced  by  an  equivalent  vehicle  at  the  time  that 
the  salvage  value  of  th.s  vehicle  equals  zero,  and  that  this  replacement 
process  can  continue  forever. 

2.  The  standerd  price  of  the  replacement  vehicle  (expressed  in  time  0 
discounted  dollars)  will  equal  the  time  0  price  of  the  current  vehicle. 

3.  The  operation  and  maintenance  costs  of  the  replacement  vehicle 

'expressed  m  time  0  discounted  dollars!  will  equal  the  time  0  costs  of 
the  current  vehicle. 

Given  that  these  assumptions  are  valid,  the  key  to  determining  a  vehicles 
economically  efficient  replacement  time  is  to  evaluate  the  equivalent  uniform 
annual  cost  <EUAC)  of  expenditures  on  this  vehicle  for  alternative  replacement 
times  over  a  realistic  planning  horizon  .  in  terms  of  economic  efficiency,  the 

optimal  replacement  time  <s  the  one  that  results  m  the  lowest  EUAC. 

in  order  to  calculate  EUAC  values  for  the  $20,000  hypothetical  vehicle 

represented  m  Figure  i.  an  assumed  set  of  operations  and  maintenance  costs  for 
this  vehicle  <n  each  /ear  are  listed  m  Table  4.  These  annuel  costs  were  chosen  to 
represent  a  typical  vehicle  expenditure  history  in  which  there  >s  a  uniform  base 

amount,  a  siowiy  increasing  gradient  of  minor  repair  costs  after  the  first  year,  and 


a  more  sharply  increasing  gradient  of  repair  costs  after  the  mid-life  of  the  vehicle. 
The  optimal  time  to  replace  this  vehicle  so  as  to  operate  at  the  minimum  EUAC 
point  is  14  years.  These  EUAC  values  are  listed  in  Table  4  and  shown  as  a  graph 
in  Figure  2. 

An  explanation  of  'he  formula  used  to  calculate  the  EUAC  values  for  this  vehicle 
is  given  in  Appendix  A.  One  assumption  made  in  calculating  these  EUAC  values  is 
that  the  expected  salvage  value  of  a  vehicle  at  its  optimal  replacement  time  will 
be  zero,  which  <s  basically  true  of  a  rational  salvage  market  if  we  accept  the 
premise  that  Brealey  and  Myers  prescribe  as  the  Fundamental  Financial  Concept  of 

Efficient  Capital  Markets:  [4.  pg.  265] 

"If  capital  markets  are  efficient,  then  the  purchase  or  sale  of  any 
security  at  the  prevailing  market  price  is  a  zero-NPV  transaction." 

Given  the  salvage  market  to  be  efficient,  then  the  one-time  repair  limit  that  should 
be  placed  upon  a  vehicle  at  any  time  proceeding  its  replacement  date  should  be 
equal  to  the  vehicle's  salvage  value  at  that  time.  Salvage  values  for  the  example 
vehicle  are  also  listed  m  Table  4,  where  it  is  shown  to  equal  zero  at  the  end  of 
year  10.  The  formula  used  to  calculate  these  salvage  values  is  also  explained  in 
Appendix  A. 

The  justification  for  performing  a  one-time  vehicle  repair  is  that  this  one-time 
repair  will  return  the  vehicle  to  the  average  operating  condition  of  similar  vehicles 
of  common  age  and  use.  This  vehicle  is  then  expected  to  perform  as  well  as  any 
similar  vehicle  that  could  have  been  purchased  at  the  salvage  value.  Given  that 
the  one-time  repair  being  considered  will  return  a  vehicle  to  average  working 
condition  for  its  remaining  lifetime,  then  the  one-time  repair  limit  should  equal  the 
salvage  value  of  an  average  working  vehicle  of  similar  type  at  that  point  in  time. 
The  alternative  would  be  to  salvage  the  vehicle  and  purchase  a  different  new  or 
used  one.  However,  if  the  salvage  market  is  working  properly,  then  the  value  of 
the  unrepaired  vehicle  should  exactly  equal  the  salvage  value  of  a  similar  working 
vehicle  minus  the  cost  of  repairs.  The  Air  Force  can  validly  operate  within  these 
principles  since  they  effectively  control  the  salvage  values  of  their  own  vehicles 
by  setting  their  own  vehicle  lifetimes  and  one-time  repair  limits. 
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Table  4:  Calculations  of  Equivalent  Uniform  Annual 
Costs  and  Economic  Salvage  Values 


Listed  below  are  hypothetical  cash  flows  for  this  example  vehicle. 


SP  =  standard 

Price  at 

Time 

0  * 

10000 

UB  *  Annual 

Base  0  &  M 

Cost 

= 

500 

SI  *  Annual 

0 

&  K  Cost 

Grad 

3 

100 

Y1  *  fear  in  which  SI  ] 

begins  = 

2 

G2  =  Annual 

0 

&  N  Cost 

Grad 

3 

220 

Y2  *  Year  in  which  G2  ; 

begins  * 

6 

i  3  Annual 

Discount  Rate  * 

0.10 

t  =  Time  of 

Replacement  = 

10 

UACt  =  UAC 

if 

held  to  i 

time 

t  = 

2736.82 

CPVt  =  CPV 

if 

held  to  1 

time 

t  = 

16816.59 

Replace 

Cash 

Salvage 

Time 

Flow 

CPV 

EUAC 

value 

0 

10000.0 

10000.0 

10000.0 

10000.0 

1 

500.0 

10454.5 

11500.0 

8763.2 

2 

600.0 

10950.4 

6309.5 

7502.7 

3 

700.0 

11476.3 

4614.8 

6216.1 

4 

900.0 

12022.7 

3792.8 

4900.9 

5 

900.0 

12581.6 

3319.0 

3554.2 

6 

1220.0 

13270.2 

3046.9 

2392.8 

7 

1540.0 

14060.5 

2888.1 

1435.2 

3 

1860.0 

14928.2 

2798.2 

701.9 

9 

2180.0 

15852.7 

2752.7 

215.3 

10 

2500.0 

16816.6 

2736.8 

0.0 

11 

2820.0 

17805.0 

2741.3 

0.0 

12 

3140.0 

18805.5 

2760.0 

0.0 

13 

3460.0 

19807.7 

2788.5 

0.0 

14 

3780.0 

20803.1 

2823.9 

0.0 

15 

4100.0 

21784.6 

2864.1 

0.0 

Note:  All  cash  flow,  EUAC  and  salvage  values  are  expressed 
in  undiscounted  dollars  for  each  year.  Each  cost  present 
value  (CPV)  amount  equals  the  sum  of  discounted  cash  flows 
up  to  the  end  of  the  year  shown. 


Theoretically.  EUAC  curves  and  salvage  values  could  be  estimated  for  each  Air 
Force  vehicle  type  based  upon  historical  records  of  operations  and  maintenance 
expenditures  for  similar  vehicles.  If  this  were  done,  the  life  expectancy  of  a 
vehicle,  as  specified  in  TO  36A1-1-1301,  should  agree  approximately  with  the  year 
corresponding  to  the  lowest  point  of  its  EUAC  curve.  Although  there  does  not 
exist  enough  data  currently  available  with  which  to  estimate  EUAC  values  for  an 
actual  Air  Force  vehicle  type,  we  can  compare  the  salvage  values  listed  in  Table  4 
with  the  values  for  OTL1  given  in  Table  1  as  shown  by  the  graph  in  Figure  3.  The 
OTLt  values  are  consistently  higher  than  salvage  values  for  corresponding  years, 
but  we  can  see  by  this  comparison  that  OTL1  is  a  reasonable  approximation  to 
economically  efficient  salvage  values.  The  major  reason  for  any  difference  is  that 
OTL)  is  drawn  to  10%  of  a  vehicle's  stancard  price  at  the  time  of  replacement 
rather  than  zero. 

Having  shown  some  economic  validity  to  the  straightforward  calculation  of  OTL1 
given  by  equation  (1),  attention  must  now  be  given  to  the  fact  that  both  sets  of 
values  shown  in  Figure  3  fail  to  include  the  proper  treatment  of  price  changes  in 
both  repair  and  replacement  costs  of  a  given  vehicle.  Equipment  price  changes 
can  occur  for  a  variety  of  reasons  such  as  technological  differences  between  older 
vehicles  and  their  replacements,  or  changes  in  contract  agreements  between  the 
Air  Force  and  its  suppliers.  General  inflation  or  selective  input  price  changes  to 
the  vehicle  manufacturing  industry  can  also  have  an  impact.  Whatever  the  reason 
for  price  changes,  it  is  important  to  calculate  the  one-time  repair  limit  in  "then- 
current"  dollars  for  the  period  in  which  a  reoair  is  being  considered.  Unless  one¬ 
time  repair  limits  are  adjusted  for  price  changes,  a  vehicle  could  be  denied  an 
economically  justified  repair  for  exceeding  a  limit  based  on  non-current  prices. 

The  Statistical  Abstract  of  the  United  States  contains  producers  price  indexes  for 
many  industrial  sectors  of  the  U.S.  economy.  Price  index  values  for  the 
Transportation  Equipment  sector  for  the  years  1970-1980  are  listed  below. 

Producer  Price  Index  Values  for  Transportation  Equipment 
year  1970  1973  1974  1975  1976  1977  1978  1979  1980 

Index  100.0  110.0  120.0  135.3  144.5  154.2  165.9  179.8  197.9 

Source:  Statistical  Abstract  of  United  States  (1982-83).  The  values 
have  been  adjusted  proportionately  so  that  1970  equals  100. 


Since  the  above  index  equals  100  for  1970,  each  value  shown  represents  the 
equivalent  cost  in  that  year  of  a  comparable  equipment  expenditure  valued  at  $100 
in  1970.  In  Figure  3  above,  if  time  0  corresponds  to  the  end  of  1970,  then  time 
10  equals  the  end  of  1980.  Figure  4  shows  both  the  straightline  OTL1  values  from 
Figure  1  and  their  inflated  values  after  multiplication  by  the  above  index  values. 
Note  that  by  the  end  of  year  10  (or  1980),  the  inflated  one-time  repair  limit  is 
almost  twice  the  value  of  the  uninfiated  limit.. 

The  same  graph  of  inflated  one-time  repair  limits  shown  in  Figure  4  can  be 
obtained  by  multiplying  the  standard  price  of  the  vehicle  by  the  index  value  for 
each  year  and  drawing  the  OTL]  line  for  that  year  based  upon  this  amount.  This 
method  of  annually  updating  the  standard  price  of  a  replacement  vehicle  so  that 
OTL  values  are  adjusted  proportionately  is  used  by  VIMS.  Hence,  the  Standard 
Price  that  appears  in  each  monthly  vehicle  record  of  the  VIMS  database  can  be 
referred  to  more  appropriately  as  a  Replacement  Price. 

A  caution  is  provided  here  concerning  economically  valid  changes  in  a  vehicle’s 
OTL  value  whenever  a  change  in  its  standard  price  reflects  technological 
differences  in  the  replacement  vehicle.  The  effects  of  general  inflation  on  price 
levels  can  often  be  disregarded  from  standard  engineering  economic  calculations 
since,  if  inflation  affects  all  cash  flows  in  an  alternatives  analysis  to  the  same 
degree,  then  proper  analyses  with  and  without  adjustments  for  inflation  will  result 
in  the  same  preferred  alternative.  For  example,  the  optimal  replacement  time  of  a 
vehicle  is  not  affected  by  general  price  inflation.  Similarly,  if  a  replacement 
vehicle  is  technologically  and  functionally  equivalent  to  the  current  vehicle,  then  a 
supplier's  price  increase  must  be  responded  to  by  an  increase  in-  the  one-time 
repair  limit  of  the  current  vehicle.  However,  if  a  replacement  vehicle  has  been 
selected  that  is  technologically  superior  to  the  current  vehicle,  and  its  higher  price 
is  acceptable  based  upon  the  benefits  to  be  derived  from  its  enhanced  capabilities, 
then  the  current  vehicle  might  be  considered  obsolete  and  thus  warrant  an  even 
lower  one-time  repair  limit,  or  an  earlier  replacement  time,  than  would  otherwise 


Currently,  an  obsolete  designation  can  be  assigned  to  the  replacement  code  of  a 
vehicle,  which  effectively  reduces  its  OTL  to  zero,  since  no  significant  repair  work 
can  be  authorized.  Ideally,  the  optimal  replacement  time  for  the  current  vehicle 
should  be  altered  in  response  to  the  greater  benefits  of  its  technologically 
superior  replacement.  However,  significant  modifications  to  the  current  VIMS 
database  and  OTL  calculations  would  be  required  to  isolate  the  effects  of  these 
benefit  and  quality  factors  on  replacement  vehicle  prices.  Hence,  the  current 

method  of  updating  the  Standard  Price  based  upon  the  most  recently  acquired 
price  for  a  replacement  vehicle  is  a  practical  alternative. 

The  primary  conclusions  of  this  section  are  that: 

1.  Setting  one-time  repair  limits  for  equipment  is  a  valid  method  of 
preventing  repair  expenditures  beyond  the  current  economic  value  of  a 
vehicle. 

2.  The  economic  value  of  a  vehicle,  as  reflected  in  its  salvage  value,  can 
theoretically  be  determined  from  the  life  cycle  costs  of  similar 
vehicles. 

3.  The  current  OTL  formula  used  by  the  Air  Force  is  similar  to,  but 

somewhat  higher  than,  the  salvage  value  of  a  vehicle  based  upon 
engineering  economic  calculations.  Hence,  OTL  appears  to  be  a 

generous  estimation  of  a  vehicle's  true  economic  value. 

4.  Since  the  OTL  formula  used  by  the  Air  Force  is  based  upon  a  vehicle's 
sT  ndard  price,  one-time  repair  limits  are  affected  by  any  changes  to  a 
vehicle’s  standard  price  because  of  general  inflation,  selective  price 
changes  to  specific  equipment,  or  technological  differences  in 
replacement  vehicles.  Whatever  the  reason  for  price  changes,  each 
vehicle's  standard  price  must  be  adjusted  appropriately  so  that  its  one¬ 
time  repair  limit  is  a  value  comparable  to  "then-current"  dollars  at  any 
given  time. 

The  impact  of  price  adjustments  to  the  one-time  repair  limit  on  recent  repair  or 
replace  decisions  at  a  given  Air  Force  base  will  be  examined  next  by  searching  a 

VIMS  historical  record  file  for  instances  in  which  vehicles  had  approached  or 

exceeded  their  OTL's  over  the  last  year.  The  purpose  of  this  analysis  is  to  assess 
the  sensitivity  of  repair  or  replace  decisions  to  the  one-time  repair  limit.  In  short, 
if  a  improved  method  of  treating  price  and  technological  changes  in  vehicles  were 
added  to  the  VIMS  calculation  of  OTL  values,  how  much  of  an  impact  might  this 
have  had  on  recent  repair  or  replace  decisions. 
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S  Retrieval  of  Data  from  the  VIMS  Historical  Record  File 


Initially,  all  6507  monthly  vehicle  assignment,  maintenance  and  use  records  on 
tape  ARAD6T  in  file  ARADOF  were  copied  to  a  hard  disk  file  using  a  tape  copy 
utility  on  the  mainframe  computer.  Since  each  record  has  length  700  (i.e.  contains 
700  characters),  a  very  large  temporary  storage  allocation  was  required  on  the  hard 
disk  to  store  this  entire  dataset.  However,  since  only  a  select  number  of  data 
fields  would  be  required  to  perform  the  investigations  of  this  research,  a  subset 
of  required  data  elements  listed  in  Table  5  were  extracted  from  this  large  file  and 
written  to  a  smaller  file  by  program  ARADOl  as  discussed  next. 

Listings  of  all  computer  programs  used  in  this  study  to  breakout,  examine, 
process,  summarize  and  display  the  data  are  included  in  Appendix  B.  Each  of  these 
programs  was  written  in  standard  FORTRAN.  Initially,  ARADOl  is  used  to  produce 
smaller  files  of  required  data  elements,  but  no  changes  whatsoever  were  made  to 
the  data  in  this  reduction  process.  Hence,  ARADOl  preserves  all  data  entries 
exactly  as  they  were  copied  from  the  ARAD6T  tape  in  this  first  step  of  the 
conversion  process. 

In  scanmg  through  the  files  produced  from  ARADOl,  it  was  observed  that  the 
consistency  of  the  records  was  dramatically  different  for  vehicle  classes  other 
than  D.  E  and  L.  There  were  roughly  20  X  vehicles  proceeding  ’L'  vehicles  in  the 
file,  and  then  some  more  vehicles  with  X  in  their  VRN's  but  not  in  their 
mangement  codes.  There  were  also  many  ’X'  and  'P'  class  vehicles  in  the  end  of 
the  file  with  missing  management  copies  or  LE  values.  Hence,  the  records  for 
vehicle  classes  other  than  D,  E  and  L  were  deleted  from  the  files.  This  left  a 
total  of  slightly  less  than  4000  vehicle  records  in  the  dataset  to  be  used  in  the 
analysis.  The  records  for  these  vehicles  were  then  divided  into  three  separate 
files  containing: 

1530  records  for  135  D  vehicles 
1048  records  for  95  E  vehicles 
1264  records  for  117  L  vehicles. 
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Tabu  5:  Data  Retrieved  from  the  ARADOf  File  of  the  ARAD6T 
Tap#  of  Monthly  Air  Fore#  VIMS  Vahtcla  Racorda 


Item# 

Field 

2X 

•Char  s 

Units 

*• 

3-10 

OX 

8 

Alphanumeric 

2 

11-14 

33X 

4 

Alphanumeric 

3 

48-50 

3  OX 

3 

Whole  Vehicles 

4 

91-84 

9X 

4 

Year/Month 

e 

94-99 

ex 

6 

whole  Dollars 

6 

100 

9X 

- 

Alpha 

«  s  i  ■»  ■* 

6X 

2 

Whole  Years 

3 

118-123 

'X 

6 

whole  Dollars 

9 

124 

ex 

- 

"  "*r.o;"-"«yes 

3  "t 

125-131 

»S5X 

Whole  Cants 

-* 

297 

:x 

1 

X/H/U/K 

298-300 

OX 

3 

M/H/U/K 

1 3 

301-306 

98X 

S 

M/H/U/K 

14 

395-400 

18X 

6 

Whole  Cants 

15 

419-425 

•J 

Whole  Cants 

Field  Name  Abbrev 

vehicle  Registration  Number  vrji 

Management  coda  HC 

venic»e  Equivalents  veq 

Acceptance  Data  AC 

Standard  Price  SP 

Replacement  Coda  PC 

-if a  Expact  an cy  _£ 

One-Time  Rapair  Coat  Limit  CTL 


One-Time  Rapair  Coat  Excaadad  CTX 


One-Time  Rapair  Cost  Prica  CTP 

(currant  astimata  if  applies) 

U  sa  Coda  -jc 

Average  Daily  Usa  AEU 

Cummuiative  'Jsa  CU 

Ciract  Labor  Cost  for  Rapairs  CLC 

'excluding  accidents) 

Total  Parts  Cost  for  Rapairs  TPC 

'excluding  accidants I 


Mote : 


A»*  -•>1*  acova  valuas  that  can  change  on  a  mcr.tnl 

snewn  as  "this  mont n"  valuas.  These  mciuda  RC,  CT 
and  TPC.  CU  accumulates  continuously,  and  ADU 
on  tea  basis  of  CU .  ADU  is  not  month  spaefic. 


y  basis  ara 

L,  CTX,  CTP, 
is  computed 


r1 *#:^****, 
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5. 1  Ref  or  mating  the  Records 

Program  ARAD02  s  used  as  a  second  step  in  the  conversion  process  reduce  the 
f  ies  from  AR ADO t  to  an  essential  numoer  of  records.  The  first  and  last  records 
for  each  vehicle  were  always  retained,  and  among  the  others,  only  records  in 
which  a  significant  data  element  changed  were  written, 
t.  The  following  data  elements  never  vary: 

•  Vehicle  Registration  Number  *VRN). 

•  Management  Code  (MC). 

•  Life  Expectancy  iLE). 

•  use  Code  <UC.'. 

2.  The  Allowing  data  elements  are  expected  to  change  monthly,  and  a 
change  in  any  of  them  would  not  cause  the  record  to  be  written. 

•  Average  Oaily  Use  'ADUI. 

•  Commutative  use  CUI. 

•  One-Time  Repair  Cost  Limn  <OTL). 

•  One-T.me  Repair  Cost  Exceeded  iQTXl. 


3.  Tne  following  data  elements  can  change  monthly,  and  if  so.  the  record 
was  written. 

•  Acceptance  Date  ADI. 

•  Standard  Price  'SP). 

•  Replacement  Code  'RCI. 

4.  'rhe  record  was  wrtten  whenever  tne  One-T  me  Repair  Price  lOTPt 
exceeded  the  One-T.me  Repair  Limn. 


5.  'rhe  Total  Parts  Cost  for  Repairs  TPCI  and  the  Direct  Labor  Cost  for 
Repairs  DlC>  do  change  monthly,  and  these  were  accumulated  as 


'unnmg  totais  and  s  mpiv  printed  each  time  a  record  was  otherwise 
wrtten. 


Whenever  a  record  s  wr  tten,  ,t  s  *irjt  tem  %  the  number  of  the  record  for  this 
vehicle  n  ’he  aRaCO'  ‘  !e  e  g.  ’  *  *>rst  monthly  r*Cord.  and  12  *  1 2tn  monthly 
recordi.  Each  <ehice  snouid  neve  '2  -ecords  *or  each  of  12  months  in  a  veer, 
except  ‘or  new  or  salvaged  vertic  es  during  tne  year 


J  1  ,2b 


m 
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Other  adjustments  to  the  data  by  ARAD02  include  deleting  the  first  character  of 
the  Total  Parts  Cost,  since  it  was  always  found  to  be  a  zero  or  a  bracket.  The 
One-Time  Repair  Price  (OTP).  the  Direct  Labor  Cost  IDLO  and  the  Total  Parts  Cost 
'TPCl  were  converted  from  whole  cants  into  whole  dollars.  in  addition,  ail 
numeric  data  elements  were  written  in  integer  form,  and  thus  all  leading  zeros 
were  striped  away.  Tha  output  files  from  ARAD02  were  thus  of  a  better  form  for 
both  visual  scanning  to  numerical  analyses. 


Note  that  the  Standard  Price  >s  included  >n  the  set  of  values  that  can  change 
monthly,  it  was  anticipated  that  the  standard  pnee  of  a  vehicle  would  probably 
snow  one  or  two  changes  >n  each  12-month  period  so  as  to  reflect  price 
adjustments  >n  the  designated  replacement  vehicle.  However,  the  adjustments  to 
standard  prices  found  on  tnis  VIMS  tape  revealed  many  inconsistencies.  Changes 
to  standard  prices  occurred  most  often  >n  the  last  monthly  records  for  some  but 
not  an  vehicles.  nstances  of  both  price  increases  and  decreases  were  found,  and 
sometimes  n  records  other  men  the  last.  Furthermore,  amomg  vehicles  of  the 
same  type  and  model  year  with  the  same  standard  price  n  the  first  record,  some 
did  not  receive  any  cnange  while  others  received  a  range  of  changes.  For 
example,  sted  beiow  are  the  standard  prices  founp  m  the  first  and  last  monthly 
'ecords  of  ten  0541  vehicles  >n  this  dataset. 

Standard  Prices  from  Monthly  Records  of  Ten  D641  Vehicles 


vehicle  s 

First  Record's 

Last  Record  s 

Model  vear 

Standard  P'1 

ce  Standard  Price 

'967 

$7 '43 

$2857 

•972 

$7143 

$4669 

•972 

S4237 

$4237 

•973 

$4237 

$4676 

•974 

$4237 

$4676 

1975 

$4237 

$4676 

'976 

$7143 

$7143 

1977 

$7143 

$6877 

•977 

$7143 

$5572 

1979 

$4237 

$4676 

that  T.e  pnee  gi»en  n  me  first  r 

ecord  for  each  vehicle  s 

which  ogicaiiy 

.naicates  two 

different  D54i  vehicle 

9> 


comparison,  prices  that  appear  n  the  'ast  monthly  records  for  these  same  vehicles 
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snow  a  great  variety  of  changes.  Without  examining  the  records  for  the  following 
year,  t  s  unciear  as  to  /whether  these  last  record  prices  become  the  first  record 
prices  of  the  'oiiowmg  year  s  data,  or  whther  these  last  record  prices  can  be 
gnored.  Nevertheless,  the  fact  that  such  widely  varied  price  changes  are 
frequently  observed  m  the  VIMS  data  suggests  that  reasons  for  these  changes 
need  to  be  investigated.  These  changes  certainly  reflect  price  adjustments  for 
reasons  other  than  general  inflation,  suppliers’  prices  cnanges  or  technological 
differences  'h  'epiacement  vehicles. 


0  Analysis  of  Vehicles  Exceeding  Their  One-Time  Repair  Limits 
n  previous  sections  was  discussed  the  method  by  which  the  one-time  repair 
limit  s  calculated  in  VMS  and  now  adjustments  are  made  to  a  vehicle’s  standard 
price  mat  cause  proportional  changes  m  the  OTL  values  for  these  vehicles, 
nconsistencies  were  noted  n  the  standard  price  changes  observed  in  the  <ast 
montniy  records  for  these  venicies.  as  can  oe  seen  by  paging  through  the  records 
shown  n  Appendix  C.  However,  t  was  found  that  OTL  values  m  the  vehicle 
records  did  most  always  agree  wtn  whatever  standard  price  was  given  as 

expiamed  next. 

Before  compning  statistics  for  vehicles  that  had  exceeded  their  one-time  repair 
’im.ts.  the  QTl  values  fou  >d  m  the  data  were  compered  to  equations  n-3).  it  was 
found  n  the  data  'or  D.  E  and  L  vehicles  that  OTL  was  always  computed  on  the 

oaS‘S  o'  a  venicie  s  age  *'om  ts  acceptance  date,  and  never  upon  ts  use.  This 

ndicates  mat  e  ther  '  vehicles  are  not  being  used  anywhere  close  to  their  annual 
vse  standards,  or  2)  the  VMS  computation  of  OTL  s  not  computing  QTl^ 

orooer  v  before  select  ng  G~~  as  the  ower  of  the  two.  Not  one  case  was  found 
n  3842  -ecords  'or  347  .enicies  where  the  value  of  OTL  selected  had  been 
calculated  on  me  basis  of  vehicle  use 


""he  'act  ’hat  0tl  s  ower  men  O^L^  'or  most  ail  vehicles  during  their  ifetimes 
s  not  unexpected.  'ne  venice  shown  n  e  gure  t  has  an  annuel  use  standard  of 
8000  m.ies  per  vear  “>owever  n  me  'irst  year,  t  was  only  used  5000  miles. 
Even  '  mi$  venicie  were  .sed  9000  mi-es  n  each  o'  me  'oiiowng  3  .ears.  OTL. 
would  stiii  -ave  been  ower  man  O’’’-  Hence,  we  see  that  f  the  use  of  a 


vehicle  ♦ills  oen.nd  its  standard  o <  expected  use  up  to  tnat  point  n  •  me.  which  s 
<erv  DfODaO'a  'or  most  .enicias  at  some  age.  ’n«n  QT^  ,$  ikaiy  -o  'amain  ower 
man  'or  tha  remainder  o'  mat  yen.cie  s  ii'a. 
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A  'aw  casas  wara  'ouna  among  'ougniy  ’0  -emcies  in  wnicn  OTl  was  ai"arent 
'rom  OTl,.  Put  not  pacausa  t  was  comoutaa  on  tha  Dasis  o'  .enicie  use.  -hese 
casas  simoiy  indicated  a  <ary  nconsistent  calculation  of  OTL.  such  as  changing 
'ha  aga  o'  tna  .en.c  a  midstream.  Moreover  -ha  accaptanca  date  'amamad  tna 

oasis  'or  OrL  .aiuas,  a. an  w nan  tna  moaai  .ear  o'  tha  vanicia  ana  ts  accaptanca 
data  dif'arad  suDstant  a>  «  eg.  Oy  as  mucn  as  tan  years.  This  usa  o'  tna 
accaptanca  date  ma.  oe  ,n«  ntanaad  pone,  'or  casas  n  which  a  .anicia  s 

-earned  ‘rom  depot  -eoair 

n  order  to  axamma  uSt  now  senary#  repair  or  'apiaca  decisions  m.gnt  oa  'o 
me  one-'  me  '«oair  m  -  program  aRaD02  extracted  a  yenicie  s  'ecora  whene.er 
•s  One-'-  me  Peps  r  »»  ca  C~Pl  exceeded  is  me-t'ma  repair  .mit.  yenicias  tnat 
nad  exceeded  r  one-'  me  'eoair  imits  n  a  previous  year  would  not  oe 

dent.'  ea  n  m,s  anai.SiS.  _  sted  n  ’’apie  6  are  tna  numpars  o'  D.  E  ana  u 
•  ehices  tnat  naa  a  0"p  .siue  greater  than  OTl  'acoroea.  'he  /emcies  were 
grouped  acoramg  -o  me  percentage  'ange  0y  An.cn  tna.r  OTP  exceeded  their  0Ti. 
^V'thm  m,»  one  ’2-monrn  period,  '0^  o'  tha  0  E  ana  _  yehicies  at  'his  Date  nad 

oaan  ast  mated  'o  'eau.ra  'aoairs  that  exceeded  tnair  one-time  'apair  imits.  More 

mport ant i .  -na  ‘otai  standard  pr  ca  o'  'epiacamant  yenicias  'or  casas  n  wn.cn 
Z~°  was  wifir  2E*-  ’s  3'^  Summea  'o  $’46000 

3'e.  ous  d  scwSs  cnj  snowed  now  dramat  cai  .  *ne  e''ec’s  o'  nt'ation  can  change 
a  -en.c  a  s  '«C'ace'T’t'ii  pr  ca  and  now  .»<  ad  'he  standard  pr  ces  assigned  'o 
seem.ngi,  dan'  cai  mode1  .an  c  as  can  oa,  3. van  me  margin  ‘or  error  tnat  ex  sts 
n  proper'.  ad|us;  °g  standard  pr  cas  'or  n'  ation  ana  technological  change,  ’he 
$’46,000  wortn  of  .en  c  es  'cur’d  aoo .  a  ’o  nave  nad  exceeded  meir  ona-t  me 
■apair  im.ts  o,  ess  ”'an  m.gnt  wen  nave  'anan  w.thin  snghtiy  nf'ated  or 

otnerwsa  ad|usted  m  ’s  'n.s  na  cates  mat  me  do'  ar  amount  n.onea  n 
:er  s  ms  -o  den.  -epai'  o'  a  <  corce  -en.c  es  Decause  o'  me  cme-’  me  -eoaif  m  t 
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Tabla  6:  Analysis  of  Vahidas  That  Excaadad  Thaw 
Ona-Tima  Rap  aw  Limits  Within  tha  Last  Yaa 


|  TOTAL  NUMBER 

OF 

VEHICLES 

IN  CLASS  D  -  135 

>  NUMBER  OF  0 

veh: 

CLES  EXCEEDING 

OTL  -  18 

NO. 

of 

Total 

Total 

Total 

RANGE  VaP.l 

clas 

SP 

OTL 

OTP 

3-  5% 

0 

n 

0 

0 

5-  io% 

0 

3 

0 

0 

10-  15% 

3 

3 

0 

0 

15-  20% 

n 

"’6446 

"645 

8882 

20-  25% 

“N 

0 

0 

0 

25-  5C% 

5 

13~423 

14934 

19592 

50-100% 

5 

5""13 

6937 

12207 

100-500% 

3 

17238 

3952 

9994 

■  TOTAL  NUMBER 

OF 

VEHICLES 

IN  CLASS  E  *  95 

■  NUMBER  OF  E 

veh: 

CLES  EXCEEDING 

OTL  »  13 

NO. 

of 

Total 

Total 

Total 

RANGE  Vafli 

clas 

5P 

3TL 

OTP 

0-  5% 

4 

38926 

3894 

4001 

5-  13% 

1 

13196 

1020 

1093 

10-  15% 

1 

13196 

1320 

1123 

-5-  20% 

1 

10196 

1320 

1194 

20-  25% 

0 

0 

0 

0 

25-  50% 

2 

18534 

1854 

2364 

50-100% 

2 

166"6 

1668 

2921 

100-500% 

2 

16676 

1668 

4044 

'  TOTAL  NUMBER 

OF 

VEHICLES 

IN  CLASS  L  -  117 

'  NUMBER  OF  L 

veh: 

CLES  EXC 

EEDING 

3TL  *  4 

NO. 

of 

Total 

Total 

Total 

RANGE  Vafli 

c.es 

SP 

OTL 

CTP 

0-  5% 

2 

; 

3 

z 

5-  10% 

■j 

0 

3 

2 

.0-  .5% 

J 

3 

3 

vS 

-5-  20% 

-J 

0 

3 

20-  25% 

Z 

2592" 

2593 

3162 

25-  50% 

4.  ^ 

33147 

3315 

4304 

53-  .  00% 

z 

2 

3 

;oc-5cc% 

* 

"220 

"22 

1921 

I3E  =  3TP-0TL 

>  •  '  x 

parcant 

y  which  OTL 

i  fc.-.-J  -z  ex: 

OTP.  Ai 

1  otr.ar 

■  colomr.s  snow 

a.s  fir  var.io 

l*s 

witr.in  t 

nasa  rangas. 

.  1  .  )0 


<F  1 
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it  is  also  interesting  to  note  By  scanning  through  the  output  from  ARAD02  that, 
for  many  vehicles,  the  one  year  accumulation  of  direct  labor  and  total  parts  costs 
over  the  last  12  months  of  records  shown,  exceeded  a  vehicle's  one-time  repair 
limit  while  the  repairs  m  any  one  month  did  not.  it  may  have  Been  preferable  to 
retire  those  prooiem  vehicles  rather  than  continue  with  repairs.  Both  of  these 
difficulties  with  the  current  use  of  the  one-time  repair  limit  require  further  analysis 
m  order  to  determine  their  impact  on  the  efficient  allocation  of  vehicle  buy 
expenditures. 

7  Summary  and  Recommendations 

improved  forecasts  of  vehicle  repair  and  replacement  needs  could  assist  vehicle 
fleet  managers  and  base  commanders  in  preparing  for  future  needs  rather  than 
having  to  react  to  sudden  shortfalls  in  vehicle  availability.  This  study  recommends 
that  the  current  procedure  used  to  adiust  the  standard  price  of  vehicles,  which  in 
turn  affects  their  one-time  repair  limits  be  examined  more  thoroughly  for  its 
economic  validity.  While  it  is  correct  to  adjust  standard  prices  to  reflect  the  price 
differences  of  replacement  vehicles,  the  data  indicates  that  current  adjustments  to 
the  standard  prices  are  very  inconsistent  and  of  such  a  magnitude  as  to  have  a 
significant  impact  on  the  dollar  amount  of  the  repair  or  replace  decisions  that  they 
are  affecting.  The  analysis  showed  that  vehicles  had  exceeded  their  one-time 
repair  limits  by  'ess  than  25%  in  a  significant  number  of  cases.  As  a  result, 
those  vehicle  s  were  potentially  denied  repair  and  retired  from  service  at  times 
when  repair  may  nave  been  the  preferred  alternative. 

Several  aspects  of  the  vehicle  replacement  code  were  also  identified  in  this 
'eport  as  assumptions  or  rules  that  may  not  Be  universally  appropriate  to  the  wide 
range  of  daily  vehicle  uses,  operating  conditions,  and  mission  support  requirements 


of  ail  Air  force  nstaiiaiions.  For  example,  a  different  weight  or  critical  priority 
associated  with  the  economic  cost  of  vehicle  downtime  can  greatly  affect  the  Best 
rimmg  of  replacement  'or  that  vehicle.  The  critical  nature  of  some  vehicles  at 
certain  bases  may  warrant  special  treatment,  but  any  variance  from  standard 
-epiacement  polices  must  be  balanced  against  demands  for  uniform  treatment 
witni n  the  vehicle  buy  program. 
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in  many  organizations,  standardized  procedures  that  lead  to  uniform  management 
directives  are  often  developed  as  cost  effective  responses  to  the  need  for 
efficiency,  often  at  some  compromise  to  soecial  needs  and  circumstances.  The 
Air  Force  vehicle  buy  program  is  a  case  m  which  the  advantages  of  policy 
standardization  are  quite  apparent.  However,  while  the  replacement  code  can 
provide  for  a  consistent  classification  of  vehicle  conditions,  it  also  overlooks  the 
performance  records  and  special  requirements  of  individual  vehicles.  Hence,  the 
implications  of  using  a  standardized  replacement  code  on  the  cost  and  frequency 
of  vehicle  replacements  m  the  vehicle  buy  program  should  also  be  examined. 

While  it  is  important  to  recognize  the  inherent  difficulties  with  using  a 
catagoneal  vehicle  condition  rating  for  all  vehicles  as  opposed  to  treating 

individual  vehicles  on  a  case-by-case  basis,  the  approach  of  this  research  was  to 
accept  the  need  for  a  standardized  index  and  thus  look  for  ways  in  which  the 
validity  of  this  index  could  be  improved.  It  appears  that  adjustments  to  standard 
prices  currently  maintained  in  VIMS  may  not  be  accounting  for  supplier's  price 

changes  in  the  correct  manner,  and  that  tmprovernents  in  this  regard  are  very 
possible  after  reasons  for  inconsistencies  m  theprice  adjustments  are  explained. 
Another  concern  mentioned  in  this  report  is  the  method  by  which  vehicle  life 

expectancies  are  estimated,  since  this  depends  upon  engineering  economic 
principles  as  explained. 

The  ultimate  objective  of  improvements  sought  to  current  procedures  is  to 
increase  the  cost  effectiveness  of  expenditures  on  vehicles  and  vehicle  fleet 
management  costs  throughout  the  Air  Force.  To  this  end,  repair  or  replace 
indicators  such  as  the  replacement  code  that  are  of  direct  consequence  to  the 

vehicle  buy  program  should  be  designed  to  best  reflect  both  the  true  economic 
value  of  a  vehicle  and  its  importance  to  emergency  preparedness  that  the  Air 
Force  must  consider  in  its  vehicle  fleet  management  directives. 
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Appendix  A:  Engineering  Economic  Calculations 
Calculations  of  equivalent  uniform  annual  cost  and  vehicle  salvage  values 
discussed  earlier  in  this  report  were  performed  with  the  following  formulas. 


Given  the  cost  in  each  period  C(  for  t»0  to  N  periods,  the  cost  present  value 
(CPV)  of  these  expenditure  amounts  at  time  0  equals: 

H  N 

CPV  *  £  C  *[P  I  P,i.t]  *  £  C/(1*i)‘ 

t»0  t  t*0  t 


Having  found  CPV  at  time  0,  EUAC  is  easily  calculated  as: 


EUAC  =  CPV*[U|P,i.N]  «  CPV*i(1*i)N/(1*i)N-1 


The  time  for  which  EUAC  has  its  minimum  value  is  the  optimal  replacement  time 
of  a  vehicle.  In  an  efficient  capital  market,  all  activities  can  supposedly  take 
place  at  minimum  cost.  Hence,  the  salvage  value  of  a  vehicle  at  any  time  prior  to 
its  replacement  time  is  the  difference  in  the  present  value  at  time  t  of  its 
remaining  operation  and  maintenance  costs  and  the  present  value  at  time  t  of  the 
minimum  EUAC  times  the  remaining  number  of  years.  For  example,  if  the  optimal 
replacement  time  of  a  vehicle  were  at  the  end  of  year  10,  the  the  economic 
salvage  value  of  this  vehicle  at  the  end  of  year  7  (given  that  it  has  performed  and 
is  likely  to  perform  as  expected  and  currently  has  no  unusual  repair  needs)  can  be 


calculated  as: 


10  to 

S V  *  £  EUAC*/(1*i)!'7  -  ^  C/(1*i)'-7 

t  t»8  t»8  t 


Special  formulas  can  be  used  to  simplify  the  above  calculations  for  uniformly 
increasing  gradients  of  expenditures.  Additional  explanation  can  be  found  in  Au 


and  Au  [3]. 
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Appendix  B:  Programs  Used  to  Retrieve  and  Tabulate 
Vehicle  Data  from  the  VIMS  Tape 

The  following  pages  contain  listings  of  four  programs  used  to  retrieve  the  data 
from  tape  used  in  this  study  and  perform  various  calculations.  The  general 
purpose  and  use  of  these  programs  were  explained  in  the  report. 

A  sample  of  roughly  40  records  output  by  ARADOI  are  shown  following  its 
listing.  Records  for  different  vehicles  can  be  distinguished  by  changes  in  the  last 
four  digits  of  the  VRN.  Since  there  were  12  records  for  most  every  vehicle,  and 
not  every  record  was  needed,  program  ARAD02  was  used  to  identify  and  write 
out  only  the  required  records  as  also  explained  in  the  report.  The  output  from 
ARAD02  for  D,  E  and  L  vehicles  is  in  Appendix  C. 

Program  ARAD03  was  used  to  identify  and  group  vehicles  that  exceeded  their 
one-time  repair  limits  within  the  past  year.  Program  ARAD04  was  used  to  check 
whether  the  one-time  repair  limit  for  any  vehicle  was  ever  calculated  on  the  basis 
of  use  instead  of  age. 
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C  •  PROGRAM  ARADC1  TO  RETRIEVE  DATA  FIELDS  FROM  THE  ARAD6T  TAPE  » 
C  B.  JANSON,  CARNEGIE-MELLON  UNIVERSITY,  PITTSBURGH,  PA  15213 
C 

IMPLICIT  INTEGER  (A-Z) 

DOUBLE  PRECISION  IFILE4, IFILE7 , VR ( 20) 

C 


c 

UNIT 

4  =  DISK  INPUT 

c 

’’NIT 

5  =  TERMINAL  INPUT 

c 

UNIT 

e  -  TERMINAL  OUTPUT 

c 

r* 

UNIT 

7  =  DISK  OUTPUT 

W 

c 

Listed 

below  are  the  data  elements  stored  in  the  VRN  vector. 

c 

Field# 

#Chars  Units 

Data  Element  Name 

Abbrev 

c 

1 

3 

Alphanumeric 

Vehicle  Registration  Number 

VRN 

c 

2 

4 

Alphanumeric 

Management  Code 

MC 

c 

3 

3 

Whole  Vehicles 

Vehicle  Equivalents 

VEQ 

c 

4 

4 

Year/Month 

Acceptance  Date 

AD 

c 

5 

6 

Whole  Dollars 

Standard  Price 

SP 

c 

6 

1 

Alpha 

Replacement  Code 

RC 

c 

7 

2 

Whole  Years 

Life  Expectancy 

LE 

c 

8 

6 

Whole  Dollars 

One-Time  Repair  Cost  Limit 

OTL 

c 

9 

1 

"  "=no; "-"=yes 

One-Time  Repair  Cost  Exceeded 

OTX 

c 

10 

7 

whole  Cents 

One  -Time  Repair  Cost  Price 

OTP 

c 

11 

1 

M/H/U/K 

Use  Code 

UC 

c 

12 

3 

M/H/U/K 

Average  Daily  Use 

ADU 

c 

13 

6 

M/H/U/K 

Cummulative  Use 

CU 

c 

14 

6 

Whole  Cents 

Direct  Labor  Cost  for  Repairs 

DLC 

c 

15 

7 

Whole  Cents 

Total  Parts  Cost  for  Repairs 

TPC 

C 

OPEN (UNIT=6 , DEVICE3 ' TTY ' ) 

WRITE(6, 401) 

401  FORMAT ( / IX , ' *  *  *  AIR  FORCE  VEHICLE  CONDITION  RESEARCH  ’) 
WRITE ( 6 , 503 ) 

503  F0RMAT(/1X, 'TYPE  INPUT  FILENAME  AND  PRESS  RETURN’/) 

READ  (6,400)  IFILE4 

WRITE ( 6 , 504) 

504  FORMAT (/IX, 'TYPE  OUTPUT  FILENAME  AND  PRESS  RETURN’/) 


READ  (6,400)  IFILE7 
WRITE (6 , 505) 

505  FORMAT (/IX, 'HOW  MANY  RECORDS  TO  SKIP  FROM  THE  INPUT  FILE?'/) 
READ  (6,*)  M 

WRITE(6, 506) 

506  FORMAT (/IX, 'HOW  MANY  RECORDS  TO  READ  FROM  THE  INPUT  FILE?'/) 
READ  (6 , * )  N 

400  FORMAT (A10) 


OPEN ( UN I T=4 , DEV ICE= ' DSK ' , F I LE= I F I LE4 ) 
OPEN (UNIT-7 , DEVICE- ' DSK ' , FILE-I FILE7 ) 


IF(M.EQ.O)  GO  TO  1 
DO  5  1=1, M 

5  READ  (4,100)  ( VR ( J) , J=1 , 15 ) 


1  DO  10  1=1, N 

READ  (4,100)  ( VR ( J) , J=1 , 15) 

100  FORMAT (2X , A8 , A4, 3 3X, A3 , 30X, A4 , 9X , A6 , A1 , 9X, A2 , 6X, 

>  A6 , A1 , A7 , 165X, A1 , A3 , A6 , 88X , A6 , 18X, A7) 

WRITE(7 , 110)  ( VR ( J) , J=1 , 15) 

110  FORMAT ( A8 , IX , A4 , IX , A3 , IX , A4 , IX , A6 , IX , A1 , IX , A2 , IX , 

21.36 


c 


>  A6 , IX , A1 , IX , A7 , LX , A1 , LX , A3 , IX , A6 , IX , A6 , IX , A7 ) 

10  CONTINUE 


999  STOP 
END 


***  Output  from  ARAD01 
VRN  fIC  VEO  AD  SP 


RC  LE  OTL  OTX  OTP  UC  ADU  CU 


72D0C924 

72D00924 

72D00924 

72DC0924 

"2D00924 

67D00471 

670C0471 

57D0047I 

67DC0471 

S7D00471 

57D00471 

67DC0471 

67D00471 

6"D00471 

67D00471 

67000471 

67D004"’! 

72000390 

720C0390 

72000390 

72D00390 

"’2000390 

72000390 

7200C390 

720C0390 

72000390 

"2000390 

720CC390 

720CC390 

7200C432 

72000432 

72000432 

72000432 

720C0432 

"2D0C432 

72DC0432 

72D00432 

72000432 

72000432 

"20C0432 

"2000432 

"30CC698 

"30CC698 

73DCC698 

"3D00698 

73D00698 

73D00698 

73000698 

73D00698 


082527 
C82527 
082527 
082527 
038804 
007143 
00"143 
007143 
00"7143 
007143 
007143 
007143 
007143 
007143 
0C"’143 
007143 
0C2857 
007143 
007143 
007143 
007143 
007143 
007143 
007143 
007143 
007143 
007143 
007143 
004669 
004237 
0C4237 
0C4237 
0C4237 
004237 
0C4237 
004237 
004237 
CC4237 
004237 
0C4237 
3C4237 
"04237 
0  C  4  2  3  7 
0  C  4  2  3  7 
004237 
004237 
004237 
004237 
0C4237 


030C98  - 
029734  - 
029370  - 
029006  - 
013467  - 
000714  - 
000714  - 
000714  - 
000714  - 
000714  - 
000714  - 
000714  - 
000714  - 
000714  - 
0C0714  - 
000714  - 
000286  - 
001339  - 
001295  - 
001250  - 
001205  - 
001161  - 
001116  - 
001071  - 
001027  - 
000982  - 
000938  - 
000893  - 
000554  - 
000821  - 
000794  - 
000768  - 
000741  - 
000715  - 
000639  - 
000662  - 
000636  - 
000609  - 
000583  - 
000556  - 
000530  - 
0C1298  - 
001271  - 
CC1245  - 
00  *  3  * 

001192  - 
001165  - 
001139  - 
001112  - 
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0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0154495 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

ooooooc 

0000000 

oooocoo 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

ooocooo 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

0000000 

oocoooo 

0000000 

0000000 

ooocooo 

oooocoo 

oooocoo 

ooocooo 

0000000 

0000000 

oocoooo 

0000000 

0000000 


H  OOC 
H  000 
H  COO 
H  COO 
H  000 
H  001 
H  001 
H  001 
H  001 
H  001 
H  001 
H  000 
H  COO 
H  001 
H  CC1 
H  OOC 
H  000 
H  001 
H  001 
H  001 
H  000 
H  000 
H  000 
H  000 
H  016 
H  013 
H  010 
H  007 
H  005 
H  000 
H  001 
H  001 
H  001 
H  0C1 
H  C01 
H  001 
H  001 
H  000 
H  COO 
H  000 
H  001 
H  001 
H  405 
H  378 
H  3C5 
H  230 
H  157 
H  083 
H  009 


000700 

000700 

000700 

000700 

000700 

003244 

003251 

003269 

003289 

003281 

003270 

003270 

003292 

003291 

003296 

003310 

003338 

002526 

002527 

002533 

002533 

002541 

002548 

002560 

002562 

002568 

002570 

002578 

002578 

002387 

0C2416 

002450 

002444 

002464 

002474 

002460 

002461 

002470 

002475 

002517 

0C258S 

0508C9 

05C8C9 

008769 

C08781 

CC8866 

009015 

009051 

009051 


000000 

000000 

000000 

oocooo 

000000 

000000 

066564 

000000 

000000 

000000 

000000 

033763 

000000 

019798 

000000 

004292 

000000 

000000 

002064 

000000 

000000 

072511 

004180 

014772 

033138 

018766 

C17816 

036483 

002653 

007740 

000000 

008216 

009834 

000000 

000000 

014243 

031578 

000000 

000000 

OOCOOO 

C0955I 

035604 

cocOoo 

015677 

000000 

000000 

021947 

020047 

018465 


0000000 

OOOOOOC 

0000000 

0000000 

0000000 

{022794 

{008893 

ccooooo 

ocooccc 

0000000 

{004212 

{C0867C 

OOOOCOO 

{008894 

COOCCCC 

0000000 

0000000 

0000000 

0000000 

0000000 

{004052 

{003458 

0000000 

0000000 

oooocoo 

{034896 

{022732 

{008132 

0000000 

0000000 

OOCOOOO 

0000000 

{039302 

0000000 

0000000 

{004212 

{009108 

0000000 

OOOOCOO 

0000000 

0000000 

cooooco 

oooooco 

{005104 

OOOCOOO 

OOOCOOO 

0000000 

{009750 

0000000 


£\v,'  -  -  'Ay /  ' 

-Ay y  -'.a.v 

£&:v: 


--  V.  /.V.  . 


C  »  PROGRAM  ARAD02  TO  REFORMAT  DATA  FIELDS  FROM  THE  ARAD6T  TAPE  • 
C  B.  JANSON,  CARNEG I E-MELLON  UNIVERSITY,  PITTSBURGH,  PA  15213 
C 

IMPLICIT  INTEGER  (A-Z) 

DOUBLE  PRECISION  IFILE4, IFILE7 
C 

C  UNIT  4  =  DISK  INPUT 

C  UNIT  5  =  TERMINAL  INPUT 

C  UNIT  6  =  TERMINAL  OUTPUT 

C  UNIT  7  =  DISK  OUTPUT 

C 

C  Listed  below  are  t he  variable  names  used  in  this  program. 


c 

#Chars 

Units 

variable  Name 

Abbrev 

c 

4 

Alphanumeric 

Veh.  Reg.  Number  (1st 

half) 

VRN1 

c 

4 

Alphanumeric 

Veh.  Reg.  Number  (2nd 

half) 

VRN2 

c 

4 

Alphanumeric 

Management  Code 

MC 

c 

3 

Whole  vehicles 

vehicle  Equivalents 

VEQ 

c 

4 

Year/Month 

Acceptance  Date 

AD 

c 

6 

Whole  Dollars 

Standard  Price 

SP 

c 

1 

Alpna 

Replacement  Code 

RC 

c 

2 

Whole  Years 

Life  Expectancy 

LE 

— 

6 

Whole  Dollars 

One-Time  Repair  Cost 

Limit 

OTL 

c 

1 

"  "=no; "-"=yes 

One-Time  Repair  Cost 

Exceeded 

OTX 

c 

7 

Whole  Cents 

One-Time  Repair  Cost 

Price 

OTP 

c 

1 

M/H/U/K 

Use  Code 

UC 

- 

3 

M/H/U/K 

Average  Daily  Use 

ADU 

c 

6 

M/H/U/K 

Cummulative  Use 

cu 

c 

6 

Whole  Cents 

Direct  Labor  Cost  for 

Repairs 

DLC 

c 

6 

Whole  Cents 

Total  Parts  Cost  for 

Repairs 

TPC 

C  Notes:  OTP,  DLC  and  TPC  are  converted  to  whole  dollars  in  this  program. 

C  Both  DLC  and  TPC  are  input  for  individual  months,  but  are  summed  over 
C  preceeding  months  and  output  that  way.  Other  than  the  first  and  last 
C  records,  which  are  output  for  every  vehicle,  only  records  in  which  a 

C  vehicle's  acceptance  data,  standard  price,  or  replacement  code  changed, 

C  or  in  which  a  one-time  repair  price  was  recorded,  are  written  to  the 

c  output  file.  Vehicle  Equivalents  are  not  written  to  the  output  file. 

OPEN (UNIT*6, DEVICE-' TTY* ) 

WRITE (6, 401) 

401  FORMAT ( / IX , ’ *  *  *  AIR  FORCE  VEHICLE  CONDITION  RESEARCH  «««  ') 

WRITE (6, 503) 

503  FORMAT (/IX, 'TYPE  INPUT  FILENAME  AND  PRESS  RETURN'/) 

READ  (6,400)  IFILE4 

WRITE ( 6 , 504) 

504  FORMAT (/IX, 'TYPE  OUTPUT  FILENAME  AND  PRESS  RETURN'/) 

READ  (6,400)  IFILE7 

WRITE ( 6 , 506) 

506  FORMAT (/IX, 'HOW  MANY  RECORDS  TO  READ  FROM  THE  INPUT  FILE?'/) 

READ  (6,*)  N 

400  FORMAT (A10) 

OPEN (UNIT=4 , DEVICE^ ' DSK ' , FILE=IFILE4) 

OPEN(UNIT=7,-EVICE='DSK' ,FILE=IFILE7) 

NV=0 

REC=1 

VREC=1 

READ  (4,100)  VRN11 , VRN21 , MCI , VEQ1 , ADI , SP1 , RC1 , LEI ,0TL1 , OTX1 ,0TP1 , 

>  UC1 , ADU1 , CU1 , DLC1 , TPC1 

21 . 38 


OTPl*OTPl/iOO 

DLC1-DLCI/100 

tpci=tpci/ioo 

WRITE ( 1 , 110 )  VREC , VRNII , VRN21 , MCI , ADI ,  SPi , RC1 , LEI , 0TL1 , CTXi , DTP I 

>  L'Cl ,  ADL'l .  C’Ji ,  DLCI .  TPC1 
Hi  REC=REC*1 

IF(R£C.3T.N)  30  TO  999 

READ  (4,100)  VRN12 , VRN22 , MC2 , VEQ2 , AD2 , SP2 , RC2 , LE2 , CTL2 , CTX2 , 0TP2 

>  UC2 ,  ADU2  ,  C'J2  , DLC2 , TPC2 
CTP2=CTP2/100 

DLC2=DLC2/100 

TPC2=TPC2/100 

IF( VRN22.EQ. VRN21)  30  TO  210 
IF  1 PRNT . ME. 1 ) 

>  WRITE ( 1 , 110 )  VREC , VRNII , VRN21 , MCI , ADI , SP1 , SCI , LEI , CTL1 , CTX1 , DTP 

>  OCl.ADUI, C’JI. DLCT, TPCT 
WRITE ( T , ■ ) 

PRNTm0 

VREC=1 

DLCT=DLC2 

TPCT=TPC2 

WRITE ( T , 113 )  VREC ,  VRN12 , VRN22 , MC2 , AD2 , SP2 , SC2 , LE2 , OTL2 , CTX2 , 0TP2 

>  'JC2  ,  ADU2  ,  C'J2  ,  DLCT ,  TPCT 
30  TO  222 


210  ?RNT=C 

VREC* VREC* 1 

DLCT=CLCT-DLC2 

TPCT=TPCT*TPC2 

IF ( AD2 . EQ . ADI . AND . 5P2 . EQ . SPI . AND . RC2 • EQ • SCI . AND . 0TP2  .  LT .  -  8 -CTL2  ) 

>  30  TO  222 
PRNT*1 

WRITE ( T , 110)  VREC , VRN12 , VRN22 , MC2 , AD2 , SP2 , RC2 , LE2 , 0TL2 , CTX2 , 0TP2 

>  L-C2 ,  AD 22  ,  CU2 ,  DLCT ,  TPCT 

222  VRN11=VRN12 
VRN21*VRN22 
MC1=MC2 
AD1=AD2 
3?1=S?2 
RCi=RC2 
LE1=LE2 
DTL1=CTL2 
CTXIOTX2 
OTP1=OTP2 
•JC1  =  UC2 
ADU1=ADU2 
C’J1=CU2 
DLC1=ELC2 
TPC1=TPC2 
30  TO  111 


IOC  FORMAT ' A4 , A4 , IX , A4 , IX , 1 3 , IX , 14, IX , 16 , IX , A1 , IX , 1 2 , IX , 
1 6 ,  IX ,  A1 ,  IX .  1 1 ,  IX ,  Ai  ,  IX ,  1 3  ,  IX .  1 6 ,  IX ,  1 6 , 2X 
RMAT ( 3X , 1 3 , IX , A4 , A4 , IX , A4 , IX , 14 , IX , 16 , IX , Al , IX 
: 5 , IX , Ai , IX , 1 5 , IX . Al , IX , 1 3 , IX , 1 6 , IX , 1 5 , 2X 


•  PROGRAM  ARADC3  TO  EXAMINE  .'EH I  CCES  THAT  HAVE  EXCEEDED  THEIR  • 

•  CNE-TIME  REPAIR  UNITS  WITHIN  THE  PAST  .2  NCNTHS  CF  RECORDS  • 
3.  I  AN  SC  N  ,  0ARNE3IE-MELLCN  IN  I  ,'ERS  IT?  .  PITTSBURGH,  PA  .6113 


INPCI  TIT  INTEGER  A-C 

CCU BCE  PRECIS  I CN  1 7 ICE A , I F ICE' , RANGE  3) 

C  I  MENS  I CN  NC'MVEH  '  3  ,  TSP  3  '  .  TCTC  3  )  ,  TCTP  0) 


UNIT  A  =  CISK  INPUT 
UNIT  5  *  TERMINAL  INPUT 
UNIT  6  *  TERMINAL  OUTPUT 
UNIT  ’  =  CISK  OUTPUT 


C.sted  oelow  are  the  variarie  names  -sed  m  this  program. 


•Char s 


vanacle  same 

Alphanumeric  e  h .  Reg.  NumDer  '1st  naif  >  ,'RN 

Alonar.uaer ic  ,'e.n.  Reg.  NumDer  2nd  ha*f)  ,'RN 

Alpr.ar.  uaeric  Management  Cade  NC 

Year  Mcr.tr,  Acceptance  Cate  AC 

wr.cle  Cc-.ars  Standard  Price  SP 

Aipr.a  Replacement  Cede  RC 

whole  Years  Life  Expectancy  _E 

Whole  Collars  Cne-Tme  Repair  Cost  Limit  CTL 

"  "*r.c;  "-“•yes  One-Time  Repair  Cost  Exceeded  CTX 

Whole  Cents  Cr.e-Time  Repair  Co3t  Price  OTP 

M/H/UVK  Use  Code  UC 

M/H/u/K  Average  Caily  use  ACU 

M/H/U/K  Cummulative  Use  C'J 

Whole  Cer.t3  Cirect  Caocr  Cost  for  Repairs  DLC 

whole  Cents  Cota.  Parts  Cost  for  Repairs  TPC 


Acorev . 
,'RN 
>'RN 


Whole  Cents 
M/H/UVK 
M/H/U/K 
M/H/U/K 
•hole  Cent 3 
whole  Cents 


Note:  CTP.  CLC  and  TPC  are  converted  to  whole  dollars  m  this  program 
Beth  CLC  and  TPC  are  now  cimmu.ative  over  preceedmg  months  as  summed 
program  ARADC2. 


CPEN i UNI T*6 , DEVICE* ' TTY ' ; 

WRITE  6.4C1) 

4C1  FCPMAT '  IX,'--*  AIR  FORCE  .'EHICLE  CCNCITICN  RESEARCH 
WR I TE  6  ,  i  C  3 


FORMAT  , IX,  TYPE  INPUT  FILENAME  ANC  PRESS  RETURN' 
PEAO  6, Will  I  F I  LEA 
WRITE  5.5C4> 


3C4  FORMAT  IX,  TYPE  OUTPUT  FILENAME  ANC  FRESS  RETURN  '•  ' 

REAC  '6,4001  IFICE' 

WRITE '6, 506/ 

:C6  FORMAT  I / IX ,  ’ HCW  MANY  FEOORCS  TO  PEAC  "ROM  THE  INPUT  FILE'1 
READ  6,* i  N 
40 C  FORMAT' All) 

OPEN  UNIT  =  4, DEVICE*' CCr"  , FI CE= I F  I CE4 t 


NUM'.’EH  I  - 
TSP 'I  -0 
*  •  (  *  _  - 
co tp 1 i  *: 

RANGE ' U , *’ 


RANGE i  2 '  - ' 

5-  l'% 

RANGE ( 3 ) » ' 

10-  15* 

RANGE  14'*' 

15-  20% 

RANGE! 5)*' 

20-  25* 

RANGE ( 6 i * ' 

25-  51* 

RANGE i ’ i « 1 

50-.:;* 

RANGE  9 ) - ' - 

:;-5:o* 

REC-0 

NVEHS *1 

REC-REC-1 

IFiREC. 3T .  N  )  GO  TO 

READ  14. IOC) 

VREC, V 

IF! VRN1.EC. 

UC .  AD 

IF' VRN1.E3. 

•  '  » 

IF'OTl.lT. 1 

v  )  Mo 

I F  <  OTP  .  3T .  0 

. AND.0T 

FORMAT i / IX . 

■  ...  zz 

IF' OTP. IT. 0 

Til  3C 

’  N  V  EHS  *  N  V  EHS ♦ 1 

'  ~c  to  111 
— •  -  ■ 

rP.lT.or_)  WR ITE ( 6 . 601 ) 

:p  pound  that  :s  less  than 


Fi OTP. 3E. 

0T1*  2 . 

OCI  0RANGE«8 

FiOTP.1T. 

OT*  *  2  . 

OC.AND.OTP.GE.OTl* 

1.50) 

ORANGE-"’ 

F 1  OTP . IT . 

0T1* 1 . 

50 . AND . OTP . 3E . OTL* 

1.25) 

ORANGE-6 

F i CT? . IT . 

OT1 • 1 . 

25 . AND . OTP . 3E . OTL* 

1.20) 

ORANGE-5 

F i OTP. IT. 

OT1 *  1 . 

20.  AND.  OTP. 3E. OTL* 

1.15) 

CRANGE-4 

F ' OTP . IT . 

15. AND. OTP. 3E. OTL* 

1.10) 

ORANGE- 3 

Fi OTP. IT. 

#  • 

•O.AND.OTP.GE.OTL* 

1.05) 

ORANGE-2 

F ' OTP . IT . 

CTL • 1 . 

0  5 . AND . OTP . 3E . DTL* 

1.00) 

ORANGE- 1 

NUMVEH ■ ORANGE ) -NUMVEH ( ORANGE ) *1 


TSP ‘ ORANGE l -TSP ' ORANGE  I  *S? 
TOOL ( ORANGE ) -TCT1 . ORANGE ) -OTL 
TCTP i ORANGE ) -TOTP l ORANGE ) -CTP 
3C  TO  111 


.00  FCRHAT  I  !  a  ,  I  3  ,  _X .  A4 ,  A4  ,  -X ,  A4  ,  _X ,  1 4 ,  IX ,  1 6 ,  IX ,  Ai ,  IX ,  1 2  ,  IX 

>  to.  IX ,  A1 ,  IX ,  IS.  IX ,  A1 ,  IX .  I  3  ,  IX ,  1 6 .  IX ,  1 5 , 2X ,  15) 

399  NVEHS-NVEHS-1 

-RITE  ~ -  0 9 )  NVEHS 

-03  FORMAT  ,  IX,  TCTA1  SOMBER  OF  VEHI01ES  *  '.12// 

>  RANGE  NUMVEH  TSP  T0T1  TOTP ' / ) 

WRITE! ' . 110)  RANGE! 1 1 .NUMVEH ( I  I  , TSP  <  I  )  ,T0T1' I l  , TOTP <  I 
110  FORMAT  A0.2X,  15, 19. I'. I") 

STOP 

END 


>> 


•  PROGRAM  ARADC*  TO  COUNT  THE  NUMBER  OF  VEHICLE  RECORDS  THAT  • 

•  ONE-TIME  REFAIR  LIMIT  IS  a  FUNCTION  OF  USE  RATHER  THAN  AGE  • 
3.  U ANSON ,  CARNEGIE-MELLCN  UNIVERSITY,  PITTSBURGH,  PA  15213 

IMPLICIT  INTEGER  iA-ZI 
DOUBLE  PRECISION  IFILE4. IFILE’ 

REAL  AGE,LE,CTLX 

UNIT  4  =  DISK  INPUT 
UNIT  5  *  TERMINAL  INPUT 
UNIT  5  *  TERMINAL  OUTPUT 
UNIT  7  *  DISK  OUTPUT 


steel  selow  are  the  van 

aDle  names  csed  in  thi 

s  program 

. 

#cnar3 

Units 

Vanaole  Name 

ADbrev 

2 

Year 

vrn  Model  Year  (Chars  1-2) 

MY 

2 

Alphanumeric 

Veh.  Reg.  NumDer  (Chars  3-4) 

VRN1 

4 

Alphanumeric 

Veh.  Reg.  NumDer  (Chars  5-8) 

VRN2 

4 

Alphanumeric 

Management  Code 

MC 

3 

Whole  Vehicles 

vehicle  Equivalents 

VEQ 

4 

Year 

Acceptance  Date 

ADY 

4 

Month  (1-12) 

Acceptance  Date 

ADM 

6 

Whole  Dollars 

Standard  Price 

SP 

1 

Alpha 

Replacement  Code 

RC 

2 

Whole  Years 

Life  Expectancy 

LE 

6 

Whole  Dollars 

Cne-Time  Repair  Cost 

Limit 

— *?•? 

1 

”  "=no; "-"’yes 

One-Time  Repair  Cost 

Exceeded 

CTX 

7 

Whole  Cents 

One-Time  Repair  Cost 

Price 

OTP 

1 

M/H/U/K 

Use  Code 

UC 

3 

M/H/U/K 

Average  Daily  Use 

ADU 

6 

M/H/U/K 

Cummulative  Use 

cu 

6 

Whole  Cents 

Direct  La Dor  Cost  for 

Repairs 

DLC 

6 

Whole  Cents 

Total  Parts  Cost  for 

Repairs 

TPC 

PEN ( UNIT’S , DEVICE* ' TTT ' ) 

WRITE (6,401) 

401  FORMAT (/LX, '  *••  AIR  FORCE  VEHICLE  CONDITION  RESEARCH  ■•*  ') 
'WRITE  (6, 503) 

503  FORMAT (/IX, 'TYPE  INPUT  FILENAME  AND  PRESS  RETURN'/) 

READ  (6,400)  I.ILE4 

WRITE (6, 504  I 

504  FORMAT (/IX, 'TYPE  OUTPUT  FILENAME  AND  PRESS  RETURN'/) 

READ  (6,400)  IFILE7 

WRITE (6, 506) 

506  FORMAT (/IX, 'HOW  MANY  RECORDS  TO  READ  FROM  THE  INPUT  FILE"”/) 
READ  (6, • i  N 
400  FORMAT (A10) 

OPEN (UN IT’4, DEVICE’ ' DSK '  , FILE* I  FI LE4 ) 

OPEN (UNIT’’, DEVICE’ 'DSK' , F ILE’I FILE’ ) 


REC=  1 


T I  ME’  1 

READ  4,1001  NY1.VRNI1, VRN2 1 , MCI , VEQ1 , ADY1 , ADM1 , S?1 , R' 
>  0TL1 , 0TX1 , 07?  1 ,  UC1 ,  A0U1 ,  C'Jl ,  DL01 ,  TPC1 


FORMAT! 12 


A2  ,  A4 

IX.  A* 


1X,A4, IX,  13 
IX, I’, IX, A1 


1 2 , 1 2  ,  IX ,  1 6 ,  IX ,  Ai  ,  IX ,  1 2 ,  IX , 
13, IX, 16, IX, 16, 2X, 16) 


60  GO  T( 


ATY:  7RN2 


. A4.2X.4HKY  », 13 


IF'ABSiRY.-ACYl) .2E.1)  3C  TC  205 

rfR:TE(-,::9.  vrm2i.sti.atyi 
::9  format <  /  :x .  ■  >  >  >  my  nct  ec-iac  tc 
>  :x.  5HACY  *.  ’ 1  . 

acy:*my: 

acmi*' 


:;s  a3e*i93-A£y:  ♦  s*tike-athi i 

1£*LE1«12 

:f!aje. !£._£)  ctlx*spi*  ■  i.c-c-s-age/ie) 

IF  i  AGE. GT .  2E )  3T’_x*o.  i*spi 
IFi ABSIOTUC-CTTIj  . 37 . 3P1/LE ) 

>  rfRYTEi-,:;:)  vrn2i,5pi.tt:.i.ct:jc,age,:.£ 
format  <  /  ix  .  •  •  •  •  ctt.  nct  ectal  tc  ctl:  • .  cx.shvrn  *  , A4/5X.4HSP 

>  1 6 , 2X ,  5HCTL.  »  ,  26. 2X.  5HCT’_.  * ,  F" .  C ,  2X .  5HAGE  *  ,  F5  .  C  ,  2X  ,  4HI.E  *,F 5 

.11  reoreo: 

IFREC.3T.N)  3C  TC  399 

READ  (4,130)  MY2  .  VSN 12  ,  VRN22  .  MC2  ,  '.'EC 2  .  ACY2  .  ACH2  .  SP2  ,  SC 2  .  CE2  , 

>  OTIC  .  CTX2  ,  CTP2  ,  JC2  .  AC'JC  ,  CO  2  .  CLC2  .  TPC2 
IF! VRN22.EQ. VRNTIj  3C  TC  210 

7REC*0 

t:se*o 

21C  7REC=VREC*1 

time*t:me*i 

. ACY2.2T.6C)  3C  TC  .1* 

IF<ABS<KY2~ATY2) .1E.1)  30  TC  215 
-"SITE  i  ■*,  1C9  )  7RN22.MY2.ATY2 
ATY2-NY2 
ATM2*^ 

215  AGE* (83-ACY2) *12  * i 6*TIME-ACK2 ) 

2£*2E2» 12 

IF ( AGE . IE . IE)  CTUC=SP2« <1.3-0. 9«  AGE/LE ) 

IF ( AGE. GT . IE)  OTUC*0 . 1  *SP2 
I F  <  ABS  < CTUC— C7C2 )  .37.SP2/TE) 

>  WF:TE(",112)  7RN22 , 3P2 ,  CT12  ,  CT2X ,  AGE ,  '_£ 


MT1 *MY2 

7RNll*VRN12 

VRN2l*VRN22 

MC1»MC2 

ATT1*ACY2 

ATN1-ATH2 

3P1*SP2 

SC1*RC2 

-E1*LE2 

:tli*ctl2 

:txi*ctx2 

:t?i*ct?2 

:ti=vc2 

acci*acj: 


399  STOP 
ENT 


2  1  . 


t 


Append!*  C  Listing  of  Output  from  Program  ARA002 


-he  ‘ouowing  pages  contain  'he  output  '  ias  from  p-ogram  ARAD02.  ”he  'ecords 
shown  for  0.  E  and  l  mss  vehicles  are  an  'ecords  n  which  a  significant  data 
element  to  this  study  cnanged  within  the  ’2-month  period  of  data  shown  py  ■  hi s 
'ape  for  a  particular  case 


rhe  columns  contain  from  'he  eft  'o  'ighf  the  following  data  ’terns. 


-'arcade  name 


ADbrev . 


4 

G 


e 

3 


: -.eager 
A.pnar. -mar  cc 
A.pnan.ner.o 
Year/Scr.en 
Who  .e  :c..ars 
A.pna 

Who.e  Years 
wno.e  2o..ars 
"  “»nc; "-"»yes 
Jhc.e  Denes 

S/H/LVK 
?t.  h /•:/* 

S/H/'J/K 

wncle  rents 
«n cie  rents 


ftor.tdy  Record  Soane 
•encore  Regiseraeion 
Management  rode 
Acoepta.nce  rate 
standard  Prcce 
Replacement  rode 
L.fe  Expeceancy 
rne-T-.tie  Repair  Tost 
Dne-Tiae  Repair  rost 
rne-Tcae  Repair  rost 
.'se  rode 

Average  Dai.y  -'se 
D_.aniu.at  ive  '.'se 


■ :-:2) 

Mumper 


Exceeded 

Price 


Direct  LaPcr  rost  for  Repairs 
Tota.  Parts  rost  for  Repairs 


•'RN2 

MC 

AD 

SP 

RC 

LE 


dtx 

dtp 

■jc 

ADU 

r'j 

DLC 

TPC 


Data  tems  OTP  DlC  and  ~PC  are  conyerted  from  whole  cents,  as  they  are 
•ecoroed  to  'he  v  MS  -ape.  ’o  whole  dollars  n  this  output.  Both  DlC  and  TPC  are 
nput  *Or  nfl  j  >  dual  n-0nths  Put  are  Summed  Over  preceed-ng  months  and  output 
•hat  way  Other  man  me  'irst  and  est  'ecords.  which  are  output  for  every 
vehicle,  only  -ecords  n  which  a  vehicle  s  acceptance  date,  standard  price,  or 
-epiacement  code  changed,  or  n  which  a  one-time  -epair  price  was  recorded,  are 
written  to  me  output  '  ie.  Vehicle  equivalents,  a  data  tem  originally  retrieved  by 
APAOOl  *'om  the  v  VS  'ape.  5  not  written  -o  the  ARAD02  output  files  since  it 
was  not  needed  ‘or  *n  s  study. 


«w  V 


' 


1 

'2200924 

2522 

"2C2 

9252" 

->  *  -* 

30098 

- 

3 

H 

0 

o 

o 

o 
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HE  DEVELOPMENT  OF  COMPUTATIONAL  EFFICIENCIES  IN 


CONTINUUM  FINITE  ELEMENT  COOES  USING  MATRIX  DIFFERENCE  EQUATIONS 


Harold  C.  Sorensen 


ABSTRACT 


The  feasibility  of  using  the  Matrix  Difference  Equation  (MDE)  theory  to 
effect  computational  efficiencies  in  continuum  finite  element  codes  has  been 
investigated  in  this  research.  The  study  was  centered  around  the  SAMS0N2 
code,  which  is  a  state-of-the-art  2-D  code  for  use  in  dynamic  structural 
analyses  of  plane  and  axisymmetric  solids  undergoing  development  within 
AFWL/NTE . 

The  SAMS0N2  code  uses  explicit  time  integration  and  is  particularly 
suited  to  the  analysis  of  large  displacement,  large  strain  problems  involving 
nonlinear  material  behavior  and  structure-media  interface  (SMI)  problems. 

The  MOE  method  is  applicable  only  to  longitudinally  periodic  structures 
within  simply  supported  or  guided  ends.  The  use  of  the  MDE  method  is  limited 
to  linear  elastic  structures  (small-displacement  theory)  for  which  the 
principle  of  superposition  is  valid.  Equilibrium  is  not  satisfied  by  the 
method.  An  approximate  solution  to  the  system  of  equations  developed  in  any 
problem  solution  is  obtained  by  a  least  squares  technique.  The  method 
involves  a  Guyan  matrix  '■eduction  which  introduces  errors.  The  eigensolutions 
obtained  by  the  method  are  unreliable  for  the  high  half  of  the  range  cf 
frequencies  and  should  be  discarded. 

Because  of  the  errors  and  approximations  in  the  MOE  method,  the  restric¬ 
tions  on  geometric  and  material  linearities,  and  its  appl icabi 1 i ty  only  to 


It 


'cA'Vjyr 


longitudinal  periodic  structures,  it  is  concluded  that  the  MDE  method  has  a 
low  potential  for  improving  the  computational  efficiency  of  the  SAMS0N2  code. 

Further  study  of  the  MDE  method  with  regard  to  large  displacement,  large 
strain  type  finite  element  computer  codes  is  not  recommended.  However,  the 
MDE  method  could  be  further  studied  for  usefulness  in  linear  finite  element 


solutions . 
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The  proposed  research  project  was  initiated  during  the  summer  1984  when 
the  P.I.  (Dr.  Harold  C.  Sorensen)  spent  eight  weeks  at  AFWl/NTE,  KAFB,  NM  as  a 
participant  in  the  AFCSP/'SCEEE  summer  Faculty  research  program.  Two  graduate 
students  (S.  S.  Miller  and  9.  L.  Bigel’sl  accompanied  the  P.I.  and  worked  for 
ten  weeks  toward  the  accomplishment  of  the  objective  of  this  research. 

During  the  summer  period,  the  P.I.  became  familiar  with  the  principles 
and  concepts  of  the  MCE  method  and  with  the  theory  and  operation  of  the 
SAMSCN2  code.  One  graduate  student  (S.  S.  Miller)  became  very  familiar  with 
the  logic  of  the  finite  element  portion  of  the  SAMS0N2  code  in  a  programing 
sense.  He  is  capable  of  changing  the  code  as  it  becomes  necessary  to  do  so. 
The  other  graduate  student  (R.  L.  8 i ge 1  is)  became  very  familiar  with  the 
slideline  concept  and  theory.  He  is  capable  of  working  with  the  code  in  this 
area. 

The  Matrix  Difference  Equation  (MCE)  method  has  been  developed  by  P.  H. 
Oenke,  et  al .  (Ref.  1)  at  the  Douglas  Aircraft  Corporation  and  has  been  shown 
by  them  to  reduce  computational  costs  associated  with  elastic  analyses  of 
spatially  periodic  structures.  The  term  "periodic  structure"  means  a 
structure  modeled  as  a  linear  array  of  identical  substructures,  "‘here  must 
also  be  a  plane  of  symmetry  in  eacn  substructure  which  is  one  of  the  key 
factors  in  the  development  of  the  method. 

In  the  MDE  method,  the  finite  element  method  'S  applied  to  one  o (  the 
identical  substructures  to  obtain  a  mechanical  impedance  matrix.  A  matrix 
difference  equation  is  derived  er om  the  impedance  matrix,  based  on  conditions 
of  equilibrium  and  compatibility  at  the  substructure  boundaries.  The  order  of 
the  difference  equation  is  reduced  by  eliminating  the  force  variables  and 
introducing  substructure  displacement  modes.  The  solution  is  found  by 


1 


calculating  the  eigenvalues  and  eigenvectors  of  a  related  character! sti c 
eauation.  The  result  is  .  closed  form  expression  in  the  longitudinal 
coordinate.  The  method  is  considered  to  be  general  and  applicable  to  complex 
structures  because  of  the  finite  element  basis. 

A  brief  summary  of  the  MCE  method  is  as  follows. 

The  finite  element  model  is  given  in  Figure  1. 
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Figure  1.  "he  structure  idealized  as  a  linear  array  of 
identical  substructures . 

'he  linear  eouat'on  of  motion  for  one  substructure  in  harmonic  motion  can 
be  written  in  the  fol lowing  form. 


A  A  =  R 


where  A  's  the  mechanical  ’mpedance  matrix,  A  is  a  column  matrix  of 


complex  displacement  amplitudes  and 


P„  i 


s  a  column  matrix  of  complex 


external  load  amplitudes  m  the  unconstrained  degrees  of  freedom. 
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The  impedance  matrix  is  given  by 


A  =  K  -  t  Llo  C  (2) 

wnere  UJ  =  frequency,  L :  'i  - 1  '  3rd  ^  ,  V]  end  C  s  square  symmetric 
stiffness,  mass  and  damping  matrices  for  the  substructure  derived  by  standard 
finite  element  procedures. 

3y  eliminating  the  interior  degrees  of  freedom  of  the  substructure,  Eq.  1 
may  be  written  as 


where 


(3) 


In  Eq.  3  and  Eq.  4,  the  subscript  S  refers  to  eauivalent  boundary 
matrices  associated  with  the  boundary  degrees  of  freedom. 

Through  an  appropriate  modal  transformation  Eq.  3  can  be  written  as 
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Equation  5  can  be  partitioned  as  follows 


where  the  subscripts  i  and  r  refer  to  the  left  and  right  boundaries  of  the 


substructure,  respectively. 

A 

By  expanding  Eq.  6  and  retaining  the  force  variables,  P,  ,  the 

~u,8 

following  matrix  difference  can  be  obtained. 


y 


(U  0 


(7) 


where 


Substituting  Eq.  9  into  Eq.  7  gives 


Equation  10  is  a  characteristic  equation  which  can  be  solved  for  the 

v  * 

eigenvalues  A  and  the  eigenvectors  Ct  ^  . 

The  above  formulation  with  force  variables  retained  is  useful  for  solving 

small  problems  involving  limited  numbers  of  degrees  of  freedom. 

If  Eq.  6  is  again  expanded,  but  this  time  with  the  force  variables, 

A 

P  ,  eliminated,  the  following  difference  equation  can  be  obtained. 

A. .  A‘°  +•  Ta  tA  A  A  f‘tl)  +  A  <u) 
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Equation  11  is  solved  by  the  substitution  of 


where  & A  is  a  column  matrix  of  displacement  eigenvectors.  This 
~  ak. 

substitution  gives  the  following  equation. 
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Equation  13  is  a  characteristic  equation  in  which  the  matrices  are  only 
half  as  large  as  those  in  Eq.  10,  and  is,  therefore,  worth  solving  even  though 
it  is  quadratic  in  \  . 

In  the  solution  for  the  natural  frequencies  and  the  mode  shapes  for  the 


total  structure,  a  boundary  stiffness  matrix,  kg  ,  and  a  boundary  mass 


matrix,  Ms  »  are  developed  for  one  substructure.  These  two  matrices  have 
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the  following  form 
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Then  two  matrices  are  defined  as  follows 


A 


I**  ^  (  ftt*-  \^Co^  Gv 


(16) 


m 


V 


C  ^  I  wbfc+  «H,  a>5 


(17) 


where 


%  ns) 


and  where  5  is  the  number  of  substructures  in  the  structure.  Thus  one 
matrix  and  one  matrix  are  defined  for  each  value  of  the  integer  v  . 

The  following  characteri stic  equation  is  used  in  the  solution  of  a 
structure  with  simply  supported  or  guided  ends. 


0 


(19) 


The  matrices  4?^  and  y  are  square  of  order  n  ,  where  r>  is  the  number  of 
boundary  degrees  of  freedom  on  one  substructure  boundary.  Therefore,  Eq.  19 
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produces  n  values  of  the  eigenva'ue  and  of  the  eigenvector 

*or  each  choice  of  the  integer  -v  .  The  eigenvalues  which  are  obtained  from 
Eq .  19  for  each  value  of  the  integer  1/  are  coupled  in  that  they  range  from 
low  values  to  high  values  in  a  definite  pattern.  The  complete  solution  to  the 
problem  is  obtained  by  evaluating  Eq.  19  over  the  entire  range  of  the  integer 
"V  • 

During  the  summer  period,  after  studying  the  theory  of  the  MDE  method, 
the  P.I.  applied  the  technique  in  the  solution  of  a  simply  supported  beam.  A 
beam  type  finite  element  was  used  in  the  solution.  While  working  through  the 
solution  of  this  simple  linear,  elastic  symmetric  problem,  many  questions 
arose  as  to  why  the  method  worked  in  predicting  natural  frequencies  and  mode 
shapes  of  the  simple  beam.  These  questions  concerned:  (1)  the  definitions  of 
Q-j  and  the  matrices  and  kW  ;  (2)  the  basis  of  the  associated 

characteristic  equation;  (3)  why  the  natural  frequencies  occur  in  patterns  of 
high-low  pairs;  (4)  how  the  method  could  be  revised  to  account  for  unsymmet- 
rical  elements;  (5)  how  to  incorporate  nonlinear  effects  into  the  method;  etc. 
Hence,  it  was  concluded  that  additional  study  of  the  MCE  method  should  be 
undertaken  to  ascertain  the  answers  to  these  and  related  questions.  However, 
this  initial  study  of  the  MDE  method  provided  enough  background  on  the  method 
to  conclude  that,  if  it  can  be  extended  to  the  nonlinear  region  and  incor¬ 
porated  into  computer  codes  like  SAMS0N2,  extremely  efficient  computations 
could  result. 

The  MDE  method  is  based  on  a  harmonic  medal  solution  for  which  the 
damping  matrix  is  defined  as  a  linear  function  of  the  mass  and  the  stiffness 
(proportional  damping).  The  linear  elastic  solution  process  involves  an 
explicit  force  balance  technique.  Hence,  the  following  question  needs  to  be 


•  •  f  V  -/  ~ s  /  s.  J .  -V  f.  -r.  -  - - 
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answered.  Can  the  explicit  force  balance  technique  in  MCE  be  extended  to  the 
nonl i near  case? 


The  SAMSGN2  code,  developed  by  T.  3elytschko  and  R.  R.  Robinson  (Ref.  2) 
of  the  T IT  Research  Institute,  uses  an  explicit  time  integration  technique 
incorporating  central  finite  difference  equations  to  determine  nodal 
accelerations,  velocities  and  displacements  resulting  from  the  application  of 
external  loads.  Strains,  stresses  and  internal  forces  are  determined  from 
these  nodal  parameters  through  the  use  of  constitutive  equations  and  material 
properties.  This  finite  difference  technique  can  exhibit  stability  problems 
if  the  integration  time  step  is  too  large.  In  many  problems,  many  small 
elements  are  used  to  obtain  the  desired  calcul ational  accuracy  and  small  time 
steps  are  used  to  guarantee  the  stability  of  the  finite  difference  solution. 
This  combination  of  many  elements  and  many  small  time  steps  over  the  desired 
time  interval  results  in  a  major  computational  task.  Hence,  there  is  a  need 
to  determine  and  implement  more  efficient  techniaues  to  reduce  the 
computational  effort  required  in  solving  these  types  of  problems. 

Implicit  analysis  schemes  require  matrix  operations  on  a  structure 
stiffness  matrix  in  order  to  obtain  the  eigensolutions  to  any  given  problem, 
"hese  implicit  schemes  do  not  exhibit  computational  stability  problems  in  the 
solution  process  but  they  require  operations,  such  as  matrix  inversion,  on 
relatively  large  matrices.  Explicit  time  integration  techniques  are  subject 
to  stability  prob’ems  but  do  not  require  the  use  of  matrix  operations.  The 
optimum  solution  technique,  therefore,  would  be  one  which  would  use  the  best 
part  of  each  type  of  solution,  i.e.,  an  implicit  solution  scheme  with 
operations  cn  a  stiffness  matrix  of  relatively  low  order.  The  MDE  method  has 
the  potential  of  becoming  the  optimum  solution  technique. 
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During  the  summer  1984,  it  was  ’earned  that  the  higher  oroe'-  elements 
wnich  oresently  exist  ’ n  the  SAMSCN2  code  do  not  work  oroper’y.  It  was  a’sc 
learned  that,  if  these  elements  could  be  used  in  the  solutions  of  problems, 
the  computational  process  would  be  more  efficient,  hence,  it  was  concluded 
that,  by  studying  the  finite  element  theory  for  the  higher  order  elements  and 
comparing  this  theory  to  the  higrer  order  element  definitions  in  the  code  and 
then  correcting  any  errors  existing  in  the  code,  the  code  would  be  more 
efficient.  'his  study  would  also  provide  the  necessary  background  in  the 
finite  element  logic  of  the  code  in  order  to  know  where  and  how  to  "ncorporate 
the  MCE  approach  into  the  code  as  MCE  is  developed 

While  at  AFWL,  it  also  was  learned  that  the  slideline  model  in  the 
SAMS0N2  code  does  not  work  as  well  as  it  was  originally  intended.  Hence,  it 
was  concluded  that  a  study  should  be  initiated  (1)  to  investigate  the 
slideline  model  in  order  to  change  it  to  be  more  compatible  with  real  world 
problems  and  (2)  to  begin  the  development  of  a  finite  element  to  replace  the 
slideline  model,  'his  study  would  also  provide  the  necessary  background  in 
the  structure-media  interface  (SMI)  concept  in  order  to  develop  an  SMI  element 
which  will  be  compatible  with  the  MDE  approach  and  the  numerical  integration 
schemes  of  the  SAMS0N2  code. 

The  slideline  in  the  SAMS0N2  code  has  no  stiffness.  Therefore,  it  has  no 
harmonic  solution,  and  the  following  question  concerning  the  slideline  concept 
needs  to  be  answered.  How  is  the  slideline  to  be  incorporated  into  the  MDE 
method  which  involves  a  harmonic  solution? 


-’nite  e  ement  computer  codes  with  ire  jsed  to  solve  problems  ;orta'n’"g 
a  '  arge  "umber  or  e'ements  are  expens've  to  ■"un.  "he  objective  of  th’S 
research  is  to  e"fect  computat' cnal  er‘ s  i  c  *  enc  i  es  m  numerical  algorithms  o* 
: or 1 1 "uum  f’n’*e  e'ement  codes  using  the  matrix  dir‘*erence  eouation  MCE 
ibd''oacn.  "Ke  "esearcn  wil'  certer  around  the  SAMSCNC  code,  but  the  genera' 
theory  shcu’d  oe  adaptao  e  to  other  continuum  *imte  element  codes.  "he 
CAMS0N2  code  ’s  a  state-c'-tre-art  research  tool  undergoing  development  within 
ArWL,  NTE  and  ’s  a  two-dimensional  code  used  for  the  dynamic  ana’yses  of  Diane 
and  ax ’ s ymret c  so’’ds.  *he  SAMS0N2  code  uses  explicit  time  integration  ano 
is  particolar’y  su’ted  *or  tKe  analysis  of  large  displacement,  'arge  stra'n 
o r o b 1 em s  -nvo'v'rg  -rri-near  material  behavior  and  structure-media  interface 
'SMI;  cond't’ons. 

Curing  this  study,  material  published  by  Dr.  h.  Denxe  and  others  at 


the  MrEcnne 1 ’  Ccug ' 

1  as 

Corpora 

ticn  will  be 

reviewed  to 

determi ne 

the 

appl i cab i ’ i ty  c*’  the 

wnr 

methcd 

to  the  solution 

of  prob’ems 

important  to 

the 

AFWL.  Much  o*  what 

(  z  1  ’ 

ows  are 

ampl i ^cations 

and  physical 

exp' anat’ons 

of 

the  ori g' na 1  work . 

"he  scope  of  the  work  <n  th’s  repcrt  deals  with  ‘^e  study  ; *  the  yCE 
theory  to  obtain  the  answers  to  the  following  questions. 

1.  What  is  the  bas’s  ‘"or  the  definition  ae  G v  ^ 

2.  From  where  are  toe  matrices  M  and  m  derived,  and  whv  do 

^  V  ~  V 

they  work  as  defined1 

3.  Why  do  hign-'ow  f"eouency  pairs  occur  for  the  dif*erent  values 


'he  purpose  this  secfon  is  to  provide  tne  results  obtained  by 
performing  work  associated  with  the  scooe  of  th's  report. 

'uesfon  I.  «hat  ’s  the  basis  for  the  definition  of  1 

'he  def*ni  tion  *'or  Qv  see  o.  11  :j"  be  obta'"ed  by  so'vmg  for  the 

*ree  ’ateral  /'brations  of  a  pnsmat'c  bar.  'his  solution  can  be  found  in  any 
textbook  on  v’brat’cns  3ef.  2'.  Only  enough  of  the  development  is  presented 
re"  to  show  how  Qv  ’ s  defined. 


r-g.  2.  Lateral ’y  Loaded  Prismatic  Beam 

'ue  mot’on  of  a  -’brating  beam  is  descr’bed  by  ".re  partial  differential 
eouat'pn  ">ee  /’braf’crs,  El  =  constant, 


Ei  =  beam  flexural  stiffness 

1  mass  Der  unit  length  of  the  beam 


md  'n  which  shear  and  rotary  inertia  have  been  neglected.  The  general 
olut'on  to  this  equafon  is 


-  fC,coik-kx  +•  Cz  f'nhkx  -hC3  C4*>kx  -f  C 4.*  in  -fax')  A'  CC5  (p ) 


Uj  =  a. 


ron  a  simpl/  suDOorted  beam,  the  boundary  conditions  are 

0  ^io,t)-0  s)kL(o,t)—^0  4)  = 


-2*0 


vom  BC and  3C3,  C.  =  C.  -  0. 
vom  BC;  arg  3 C -1 , 


0  -  C  %  5,r,h  /hi  -f~  5m 


0  -  :z  5<nh  ki  -  Cj.  Tin  hi 


or  a  "ontr ' vi a  1  so'ufon,  the  determinant  of  the  coeff 'cients  in  Equations  23 
nd  must  be  zero.  -ence, 


5-  n h  kl  sm-hl  -  0 


luation  25  can  be  safs^'ed  orovided  0  ■ 


; a- >-.v  v; >.v.v.v.v.v:av;^"^v:«'.' a:--. v 

-•  ••  ■-  .'•’.V.'.'.  /.V.  a’a'/.  a  -f-V.V.  .w.v.v. . .  J 


'herefore , 


A  l  =  <n  rr 


n  = 


.  3, 


36 ) 


and  h  2  =  1 

J.  2 

We  now  see  from  Equations  Z2  ana  2'  that  a  simply  supported  oeam  has  an 
infinite  numper  of  natural  frequencies  and  modes  of  vibration. 

Note  that  in  Eauation  25,  n  's  the  "umber  of  half  sme  waves  'n  the 
simply  supported  beam  associated  with  each  of  the  various  natural  modes,  ’his 
equivalency  for  n  can  be  verified  by  the  following  procedure. 

Substitution  of  Equation  25  into  either  cf  Equations  23  or  24  gives 
Cj  -  0.  Hence  the  general  solution,  Equation  21,  reduces  to 


=  Cn  Sin  ~ 


:  23 ) 


Note  that  the  term  s mnJI~  is  a  shape  function  for  wnich  only  the  amplitude 

varies  with  t ; me .  3 1  o t s  of  u-  Sin  'HI  for  n  =  1,  2,  3  ar<»  as  follows' 

J  J 


*  =  1  i  -•  *  ln  — 


ir* 


F i "st  Mcde 
1-hal f-sine  wave 
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Second  yode 
1-hal  f-s  me  waves 


n  =  3  M  =  ,,r> 


3r* 


r  ,,n  — 


"h  i  rd  Mode 
3-ra 1  f-sme  waves 


Fig.  3.  Mode  Share  Patterns 


yode  shape  patterns  simi’ar  to  *hose  in  Fig.  3  can  be  obtamed  for  a 
finite  number  of  the  mode  shapes  er> r  a  simply  supported  beam  it  the  length,/, 


of  the  beam  is  represented  by  a  *imte  "urter  or  eaua  ength  segments,  s, 
Hner-a  $  -5  associated  with  the  number  of  modes  shapes  desired,  'hen  <  in  the 
S'ne  term  of  Equation  23  'S  ’-eoresented  by  a  "umcer,  i  ,  of  the  segments  wthm 
the  r3nge  ze  values  o *  s. 

"or  evamp’e,  i  f  the  number  of  mode  spaces  deseed  is  3,  then  s  -  3  and 
tne  erqth  o(  each  segment  -s  ^/a  ,  and  t"e  team  -s  '‘eoresented  as  $ncwn  ’n 
-•g.  a .  we  tan  «r>*e 


- 


J 


~  -  r)  rr  \  =  i)  7T  /i.  •  - 


u  ) 


'  3 
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r-o 
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.  X  _  t 
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where  i 


tne  "umber 


oart-cu'ar  segments  wh’th  ’ocate  a  particular  ccmt  a’ong  the  beam.  -er-ce 


=■  5>0  ~  Sir) 


njrx 


s  n  twn  .  ;  t  'S  concluded  -’"dm  Eouat'on  29,  that 


and  tne  ( '  rs t  three  mode  $naoe  oatterns  are  as 
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w v  5 
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wn-tn  is  th}  s/mbo'is,m  osed  m  the  MCE  theory. 
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Fig.  i .  *cde  Shape  °a-terns 


'"e  has  more  rows  than  columns  and,  therefore, 

educes  **e  s-;e  ov  fe  prop'em.  ”he  <OTS  0f  the  scalars,  a  and  b,  nave  been 


:»osen  to  oreserve  fe  symmetry  and  the  anti  symmetry  properfes  of  the  a-tvpe 
and  b-type  r so’ aceme^ts  through  the  transformation.  'he  oeros  m  fe 
t-jrs^ormat ' on  are  a'so  -ecui-ed  -n  order  to  preserve  fe  3 i spl acements  m  the 
proper  o rde r ,  ve.,  a-tyce  fans  frm  *0  a-tyoe  ano  b-type  transform  to  b-type. 
•r-  order  ‘"or  v  and  *0  work,  as  defied,  fey  must  be  associated  with 

f  e  :r'.g-na'  subsfuc  t /» .  A  summary  0*  fe  f  ansfprmaf  or  procedure  recuired 
to  snow  ft  assoc  at-  ;n  s  as  *pi’ows. 


where  Qg  -s  fe  maf**  o‘‘  the  substructure  boundary  0- so' acements  'global 


sense  and 


'"e  ~atr-<  of  fe  transformed  substructure  boundary 


0 • s p  a  c eme n  t  s  ’’coal  sense 


.Of  Subs*  ’  ft  '  on 
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uatior  22,  is  partitioned  according  to  a  3rd  b  tyoe  displacements 

■v-  3 

ie  * evt  and  rignt  sides  of  the  substructure .  "he  matrix  has  two 

r  /  4 ) 

fions  to  correspond  to  the  partitioning  of  "  .  "he  matrices  A'  and 

-s  —  3a. 

nave  n  ^ows  and  n.  ro ws  in  order  to  be  conformable  with  I  and  '  . 
a  a  b  -  a  -  b 

Expanding  Equat'C"  32  gives 
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Fig.  3.  Substructure  Constraints  for  -  S 


'hese  constraints  can  be  realized  physically  by  mechanical  linkages  that 
require  the  ratios  to  have  the  values  shown.  In  particular  from  Fig.  7  for 
V-  y  ,  all  a-type  displacements  on  the  right  hand  boundary  and  b-type 
displacements  on  the  left  hand  boundary  are  constrained  to  be  zero  as  shown. 
Similarly  from  Fig.  g,  the  a-type  and  b-type  displacements  have  equal 
magnitudes  with  the  same  sign  and  fnom  Fig.  8,  the  displacements  have  the  same 
magnitudes  but  oprosite  signs.  Thene'ore,  the  constrained  structure  is  a  real 
structure,  and  -  ts  sti**ness  and  mass  matrices  are  positive  definite,  for  all 
values  of  iv  . 


boon  substitution  of  g 

faa.  2  a  b 


and  ,  the  matrix 


'k 


v 


becomes 


A*  = 


^ab  L  t>2) 


(**-*>*)  I 


(39) 
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Noting  that 


(X2-hbZ=!  ’j  a-Z-bZ  -  5»  n  9U  •  Zo-b^CtsQ^ 
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(40) 


Simi larly 


r^c,  -t  na<xco  5  ^ 


w  v  - 


T  -,»  a 


rtflb  5 


I  >Y) 

!  nkh  +  ^hMev 


(41) 


Thus  J?v  and  rn  y  are  stiffness  and  mass  matrices  of  the  original 


substructure  modified  by  the  constraints  implied  by  the  transformations. 
These  constraints  can  be  physically  realized.  Therefore,  and  YV)  „  are 
stiffness  and  mass  matrices  of  a  real  structure.  They  are  therefore  positive 
definite,  and  the  eigenvalues  oj *  of  the  frequency  equation 


v 


~  UO 


W) 


<kv  ~  v 


(42) 


are  real  and  positive.  The  corresponding  eigenvectors  Q  .  are  real. 


■  \  % 


Question  3.  Why  do  high-low  frequency  pairs  occur  for  the 
different  values  of  i;  ? 

.he  answer  to  this  question  is  found  by  examining  the  solution  to 
Equation  13,  which  is  rewritten  here  for  continuity. 

^  4  =  £  (13) 

~  < 

The  A  matrices  in  this  equation  are  of  order  n  and  the  characteristic 
0  A 

equation  has  i  n  eigensolutions ,  since  it  is  quadratic. 

A 

By  dividing  the  A^  and  rearranging  the  terms  in  Equation  13,  the 
characteristic  equation  can  be  written  in  the  following  form 


For  a  nontrivial  solution  of  the  characteristic  equation  to  exist,  the 
determinant  of  the  coefficient  matrix  must  be  zero,  i.e., 


The  rows  and  the  columns  in  a  determinant  may  be  interchanged  without  changir 


its  value. 


Therefore , 


Q  T  I  *  r  *  T  x, 

A  *  +  A  +  A  i  A  ^  o 

^8rt  -  Btr  'fe. 
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■  he  boundary  impedance  matrix  can  be  written  in  partitioned  form  as 


A  = 

~8 


-V 


This  impedance  matrix  is  symmetric,  therefore 


^8 U  ~ 

A  -T  A 

A  =  A  4 

~  8  ii  -  9// 

A  -r-  A. 

A  8/r  = 


^  j  , 

Hence,  if  in  Equation  45  is  replaced  by  /\.  »  the  characteristic 

A 

equation  is  still  satisfied.  Therefore,  if  Is  an  eigenvalue,  then  its 

reciprocal,  yx.,  is  also  an  eigenvalue. 

A  A 

Let  X.  =  1:56  an  ei9enva'ue  °f  the  characteristic  eauation,  and 

A  7  * 

let  Xa  s  l//s  =  |  A  for  which  A q  i,  must  also  be  an  eigenvalue. 


Hence 


X„  -  !/a  _  |  L  for  which  Adi.  must  also  be 

3*~  ^Xjj.  3 * 


x0,  = 


The  conclusion  is  that  the  eigenvalues  occur  in  reciprocal  pairs,  such 
that,  one  of  the  values  is  associated  with  a  low(er)  frequency  and  one  with  a 
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great(er)  frequency.  The  subscripts  J.  and  g  refer  to  "lower"  and 


"greater"  as  imolied  in  the  definitions. 


A  study  of  the  SAMS0N2  code  was  conducted  concurrently  with  the  study  of 


the  MDE  method.  The  study  concerning  the  SAMSGN2  code  has  not  been  completed 


at  this  writing  and  is  currently  supported  by  funding  provided  by  the  Air 


Force  Weapons  Laboratory.  However,  the  SAMS0N2  study  has  progressed  far 


enough  to  form  the  conclusion  that  the  results  of  the  SAMS0N2  study  will  not 


change  the  findings  pertinent  to  the  MOE  method  as  stated  in  this  report.  The 


intermediate  results  available  at  this  time  from  the  SAMS0N2  study  will  not  be 


reported  here  but  will  be  discussed  in  detail  in  a  final  report  to  the  APWL  in 
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’he  SAMS0N2  code  is  a  two-dimensional  code  to  be  used  for  dynamic 
structural  analysis  of  plane  and  axisymmetric  solids.  The  program  uses 
explicit  time  integration  and  is  particularly  suited  to  the  analysis  of  large 
displacement,  large  strain  problems  involving  nonlinear  material  behavior  and 
structure-medi a  'SMI)  problems. 

In  contrast,  the  Matrix  Difference  Equation  (MDE)  method  is  a  hybrid 
approach  that  can  be  expected  to  increase  the  efficiency  of  the  finite  element 
analysis  only  for  a  particular  class  of  structures.  The  MDE  method  is 
applicable  only  to  periodic  structures  and  is  based  on  the  following 
assumptions . 

1.  The  structure  is  represented  by  a  finite  element  model. 

2.  The  model  is  longitudinally  periodic  which  requires  the  axis  of  a  linear 
array  of  identical  substructures  to  be  a  straight  line. 

3.  Strains  are  linear  functions  of  displacements,  stresses  are  linear 
functions  of  strains  and  loads  are  linear  functions  of  stresses  ( i . e . , 
geometric  and  material  linearity). 

4.  Forcing  functions  are  sinusoidal  functions  of  time  of  a  single  frequency. 
Forcing  functions  include  external  loads,  support  displacements  and 
element  unassembled  deformations.  Each  forcing  function  can  have  its  own 
amplitude  and  phase  angle.  Responses  to  forcing  functions  of  different 
frequencies  can  be  separately  calculated  and  superimposed  in  the  time 
domain  because  of  the  assumed  linearity. 

5.  The  substructure  is  symmetric  about  a  median  plane  normal  to  the 
longitudinal  axis  (i.e.,  longitudinal  symmetry). 

6.  The  ends  of  the  structure  are  simply  supported  or  guided  according  to 


generalized  definitions. 


7.  "he  assembled  substructure  damping  matrix  is  a  linear  combination  of  the 
assembled  mass  and  stiffness  matrices  (i.e.,  proportional  damping. 

An  advantage  of  the  MDE  method  compared  to  conventional  finite-element 
analysis  is  that  the  responses  in  the  MDE  method,  such  as  displacements,  are 
given  in  closed-form  exponential  and  sinusoidal  functions  of  the  longitudinal 
coordinate.  As  a  result,  a  significant  cost  savings  in  computing  should  be 
realized  compared  to  the  conventional  approach.  For  example,  all  of  the 
natural  modes  and  frequencies  of  a  periodic  structure  of  a  particular  type  can 
be  found  by  calculating  the  eigensolutions  of  characteristic  equations  equal 
in  order  to  the  number  of  degrees  of  freedom  on  one  substructure  boundary. 

An  advantage  of  the  MDE  approach  compared  to  differential  equation 
analysis  employing  ordinary  or  partial  differential  equations  with  constant 
coefficients  is  that  while  the  structure  must  be  longitudinally  periodic,  it 
need  not  be  uniform  in  any  direction,  and  any  boundary  conditions  can  exist 
along  the  edges. 

However,  the  SAMSCN2  code  does  not  fall  into  either  the  category  of 
conventional  finite  element  analysis  or  that  of  linear  ordinary  or  partial 
differential  equations  with  constant  coefficients.  Therefore,  the  advantages 
previously  mentioned  are  not  applicable  to  the  SAMS0N2  code.  In  fact,  It  is 
the  opinion  of  the  writer  that  the  MDE  method  cannot  be  incorporated 
successfully  into  the  SAMS0N2  code  because  the  MDE  method  is  too  restrictive 
in  its  development  and  use.  A  list  of  disadvantages  of  the  MDE  method 
pertinent  to  the  SAMS0N2  code  is  as  follows: 

1.  The  structure  must  be  longitudinally  periodic.  (The  SAMS0N2  code  is  used 
frequently  *or  the  solutions  of  axisymmetric  problems.) 


2.  'he  structure  must  have  pinned  or  gu’ded  ends.  'oo  ro^tr-* ct; ve  for 
SAMS0N2.'  'he  solutions  to  prop’ems  with  other  end  conditions  by  the  MDE 
method  are  very  complicated. 

3.  'he  MDE  method  is  bounded  on  linearity.  'In  direct  conflict  with  the 
nonl inear  capability  in  5AMSCNZ .  ; 

A.  'he  substructures  must  be  symmetr-ca1  about  a  median  line.  ;'h's  would 
eliminate  the  use  of  some  elements  in  SAMSCN2,  e.g.,  all  <orms  of  the 
tr i angul ar  el ement . ) 

5.  Only  sinusoidal  forcing  functions  may  be  used  with  the  MDE  method.  lit 
would  be  difficult  to  model  the  high  amplitude  pressure  wave  used  in  the 
SAMSGN2  code  as  a  sine  wave.) 

6.  'he  MDE  method  requires  the  use  of  a  stiffness  matrix.  (SAMS0N2  is  based 
on  explicit  time  integration  for  which  there  is  no  requirement  to  compute 
a  stiffness  matrix. ) 

7.  Weighting  factors  are  needed  to  obtain  solutions  by  the  MDE  method  for 
end  conditions  other  than  pinned  ends  or  guided  ends.  These  weighting 
factors  have  not  been  derived. 

8.  The  equilibrium  condition  used  in  the  MDE  method  results  in  untransformed 
forces  that  only  approximately  satisfy  equilibrium  at  a  loaded  boundary. 
(Dynamic  equilibrium  is  satisfied  in  the  SAMS0N2  code  through  the  use  of 
the  equation  of  motion.) 

9.  The  MOE  method  requires  the  use  of  the  principle  of  superposition. 
Hence,  only  small  displacements  are  allowed.  (Large  displacements  must 
be  allowed  in  the  code  because  of  the  extremely  high  magnitudes  of  loads 
in  AFWl  problems.)  It  is  the  opinion  of  the  writer  that  the  extension  of 
the  MDE  method  to  incorporate  nonlinear  capabilities  would  be  an  enormous 


10.  In  conventional  finite  eiement  procedures,  a  set  of  eque  ions  is  solved 
based  on  one  independent  equation  per  degree  of  freedom,  i.e.,  per 
unknown  displacement  in  the  problem.  In  the  MDE  method,  a  coordinate 
transformati on  is  performed  to  reduce  the  number  of  unknowns 
(displacements)  in  the  problem  in  order  to  reduce  the  computational  time 
required  in  the  solution  (refer  to  the  discussion  on  p.  20). 

In  MDE,  the  number  of  ena  conditions  is  equal  to  twice  the  number  of 
degrees  of  freedom  on  one  substructure  boundary.  Hence,  the  actual 
number  of  scalar  equations  available  for  the  solution  is  2n,  where  n  * 
the  number  of  degrees  of  freedom  per  substructure  boundary.  After  the 

A  A 

transformation  is  applied,  the  number  of  unknowns  is  Zn  ,  where  0  = 
the  number  of  transformed  degrees  of  freedom  per  substructure  boundary. 

Thus,  in  the  MDE  method,  there  exist  2n  scalar  equations  and  2  n 
unknowns  with  the  number  of  equations  greater  than  the  number  of 
unknowns.  Consequently,  no  solution  exists  that  exactly  satisfies  all  of 
the  equations.  However,  an  approximate  solution  is  obtained  based  on  the 
method  of  least  squares,  which  is  applicable  when  a  set  of  real  equations 
has  more  equations  than  unknowns.  The  least  squares  method  gives  a 
solution  for  which  the  sum  of  the  squares  of  the  residuals  (errors)  of 
the  equations  being  solved  is  a  minimum. 

11.  The  eigenvalues  obtained  in  the  MDE  method  occur  in  reciprocal  related 
pairs;  one  low  frequency  value  and  one  high  frequency  value.  The  higher 
frequency  values  and  the  corresponding  mode  shapes  produced  by  the  MDE 
method  tend  to  be  inaccurate  and  unreliable  (tne  error  is  greater  than 
25*  even  in  relatively  small  problems)  and  should  be  discarded.  (In  many 
problems  of  interest  to  the  Air  Force  the  higher  frequencies  of  vibration 
can  contribute  significantly  to  the  solution.)  The  errors  result  from 
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severe’  approx  i  rna  t '  ons  inrerent  in  the  MDE  method.  A  discussion  of 

several  approx'mat ions  is  g’ven  briefly  t  the  fol’owing  paragraphs. 

Errors  are  attributed  to  the  substructure  mass  matrix,  xmch  is 
approximate,  "his  mass  matr'x  approximation  is  associated  with  the  Ouyan 
transformation  used  in  the  MDE  method  as  discussed  in  the  following 
paragraphs . 


A  Euyan  transformation  Ref.  A;  is  used  in  the  MDE  method  to  reduce 
the  size  of  the  problem.  Just  as  it  is  necessary  to  reduce  the  size  of 
the  stiffness  matrix  for  the  static  structural  analysis,  the  simultaneous 
reduction  of  the  rondiagona!  mass  matrix  £or  natural  mode  analysis  is 
also  reouired. 

The  general  static  structural  equations 

F=  k  X  (Force  =  stiffness  *  displacement) 

can  be  arranged,  so  that  after  partitioning,  the  following  form  exists. 


rf.' 

f 

~  88 

In 

'-*.1 

9  =  boundary 

—  ^ 

KlS 

!^n 

I  =  interior 

Joon  expansion,  the  two  '•“suiting  equations  are 

Fg  =  t-SS-B  ^ 

Ft  =  FsF  +  UrrXt 

From  Eouaticn  50 

=  ~  II  (  Fl  ~  IS^) 


(48) 


(49) 

(50) 


(51) 
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Substituting  Eauation  51  into  Equation  49  gives 


(52) 


where 


Sri 


(53) 


and 


F 

~8 


Fr 


(54) 


Note  in  Equation  54  that  Fg  i  s  a  matrix  of  actual  loads  applied  to  the 
boundary,  while  Fg  is  a  matrix  of  equivalent  boundary  loads. 

In  a  Guyan  reduction  the  internal  forces,  _Fj,  are  eliminated,  i.e., 
F.  =  0.  Hence,  with  Fr  =  0,  Equations  51  through  54  give 

-l  —  — i  — 


tfrr 


(55) 


Fs  -  SS*e 


(56) 


and 


^ir  ill 3 


'(57) 


By  comparing  Equations  51  and  55,  one  can  see  that  an  error  exists  in 
calculating  interior  displacements,  because  the  effects  of  the  interior 
loads  are  not  included  in  a  Guyan  transformation,  i.e.,  =  0. 


He  Ouyan  transformation ,  wnich  produces  Equation  55  is 


53 


or  in  equation  ^orm, 


,  or 


If  the  structure  energies  are  wr-ften  T-~XTMx  (kinetic  energy 
and  V=r;X  kx  (potential  energy)  and  the  3uyan  transformation,  i: 
used,  the  result  is  fRef.  5) 


1  XT 
Z  -B 

(60 

I  XT 
Z 

'(61 

from  which  the  reduced  stiffness  is  seen  to  be 


ard  the  recuced  mass  matr’x  's  seen  to  be 


Evaluation  of  Eouat’on  52  gives 


which  is  identical  to  Equation  57. 

if  the  nondiagonal  mass  matrix  is  taken  as 


M  gs  M8I 


(65) 


the  reduced  mass  matrix  resulting  from  Eauation  63  is 


is'^n^rj  ^Tg 


(66) 


From  Equation  6*1  it  can  be  seen  that  in  the  case  of  the  reduced  stiffness 
matrix,  none  of  the  structural  complexity  is  lost  by  the  Guyan 
transformation,  since  all  elements  of  the  original  stiffness  matrix 
contribute.  However,  in  the  reduced  mass  matrix,  combinations  of 
stiffnesses  and  mass  elements  appear.  The  resuit  ,s  that  the 
eigensolution  problem  is  not  exactly  preserved. 
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App’/ing  t  rie  Guyan  '■educt'on  in  the  *DE  method  to  the  dynamic 
oro&’em  results  in  another  approximation,  which  is  associated  with 
,rertia  loads.  As  previous’/  discussed,  the  Guyan  reduction  is  based  on 
the  assumption  that  interior  displacements  result  from  imposed  boundary 
displacements  and  not  ;rpm  'nterior  loads  which  are  assumed  to  be  zero, 
^erce,  in  the  dynamic  case,  'arge  interior  inertia  loads  can  be  acting 
even  '  *’  no  external  loads  are  applied  to  interior  nodes. 

J[.  CONCL’-S :  CNS 

Sased  on  the  previous  discussion,  it  is  concluded  that  the  potential  for 
the  Matrix  Difference  Eauaticn  method  to  effect  any  significant  computational 
ef*’Cier.cies  in  the  SAMS0N2  finite  element  code  being  developed  at  AFVJl/NTE  is 
very  low. 

VII.  PECDMMENCATIPNS 

It  is  hereby  rorormended  that  financial  support  by  the  Air  Force  for 
future  researcn  on  the  MDE  method  for  possible  incorporation  into  large 
displacement,  large  strain  type  finite  element  codes  be  discontinued. 

-uture  work  to  determine  the  'easibility  of  the  MDE  method  for 
i ncorporation  info  more  conventional  linear  elastic  finite  element  codes, 
because  of  the  reduction  in  the  order  matrices  used  in  the  MDE  method,  could 


oe  supported. 
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ABSTRACT 


The  centrifuge  model  technique  is  used  to  evaluate  the  behavior  of 
a  of  5-in.  X  5-in.  concrete  box  culvert  under  a  4-in.  backfill  soil. 

Two  different  types  of  soil  installations  are  studied:  embankment 
and  trench.  Results  of  the  centrifuge  model  study  for  both 
installations  are  compared  with  each  other,  and  with  predictions  of  a 
finite  element  code,  CANOE  (Culvert  ANalysis  and  OEsign). 

Furthermore,  the  influence  of  soil  stiffness  for  backfill  is 
studied  using  finite  element  analyses.  The  results  of  CANDE  analyses 
including  nonlinear  constitutive  models  for  characterizing  culvert  and 
soil,  incremental  construction  and  free  vertical  movement  with  a 
symmetric  mesh  are  reported. 


2.  Conduct  a  preliminary  series  of  centrifuge  model  experiments  on 


a  small  capacity  centrifuge  in  order  to  determine  the  influence  of 
installation  types  (embankment  and  trench)  on  the  behavior  of  the  box 
culvert. 

3.  Predict  the  behavior  of  the  box  culvert  using  finite  element 
analysis. 

4.  Gain  experience  necessary  for  model  studies  in  a  large  capacity 
centrifuge. 

C.  Scope 

With  these  objectives  in  mind,  the  research  is  reported  in  the 
following  sections.  They  contain  a  description  of  the  centrifuge 
facilty  used  for  model  study;  design  and  fabrication  of  an  accompanying 
testing  apparatus ;  investigation  of  the  influence  of  installation  types 
using  a  centrifuge  model  technique  and  finite  element  analysis;  and 
investigation  of  the  influence  of  soil  types  using  finite  element 
analysis.  Finally,  some  potential  topics  for  future  research  in  this 
area  are  mentioned. 
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SECTION  II 


CENTRIFUGE  MOOEL  STUOY 

A.  Fundamentals  of  Centnifuge  Modeling 

One  of  the  most  ideal  approaches  for  obtaining  information  on  the 
behavior  of  protype  structures  is  full-scale  model  testing.  A  full 
scale  model  with  the  necessary  insrumentation  (i.e.  soil  stress  meters, 
pore  water  pressure  transducers,  settlement  gages  and  strain  gages, 
etc. )  could  give  the  best  results  for  estimating  prototype  behavior. 

Unfortunately,  full-scale  model  testing  has  serious  major 
drawbacks:  mainly,  cost  and  time  of  construction  and  operation. 
Because  of  these  reasons,  small  scale  model  testing  is  becoming  a 
favorite  testing  method  in  geotechnical  engineering. 

However,  use  of  small  scale  model  tests  in  the  laboratory  is 
severely  limited  when  the  gravity  body  force  of  the  structure  itself  is 
the  principal  load  on  the  system,  such  as  in  dams  and  embankments. 
This  limitation  is  due  to  two  major  factors.  One  is  that  soil 
character istics  are  nonlinear  and  overburden  dependent,  and  the  other 
involves  stress  magnitudes.  The  stresses  in  a  small  scale  model  due  to 
its  own  weight  are  much  smaller  in  magnitude  than  those  in  the 
corresponding  prototype  system.  To  eliminate  these  deficiences,  the 
centrifuge  modeling  technique  has  been  used  since  1931.  The  increase 
in  unit  weight  is  achieved  by  placing  a  model  in  a  centrifuge  and 
spinning  it  to  produce  an  acceleration  field  that  is  equivalent  to  an 
artificial  gravitational  field.  In  this  way  the  state  of  stress  at 
every  point  in  the  model  under  an  artificial  gravitational  field  is 
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equal  to  that  at  the  homologous  point  in  the  prototype.  This  technique 
has  been  applied  to  a  variety  of  geotechnical  problems  (slope 
stability,  reinforced  earth,  foundation  design,  offshore  gravity 
platforms,  rockfill  dams,  tunnels,  and  burried  circular  pipes)  reported 
elsewhere  (References  1,2, 3, A  and  S) .  Table  2.1  summarizes  the  scaling 
rules  that  have  been  developed  for  relating  the  behavior  of  the 
centrifuge  model  and  an  equivalent  full  scale  geotechnical  structure. 


B.  The  Centrifuge  and  Monitoring  Systems 


1.  The  Centrifuge 


The  University  of  California,  Davis'  geotechnical  centrifuge 
(Schaevitz  Type  B-8-0  rotary  accelerator)  was  used  for  the  present 
model  study.  It  was  designed  to  apply  controlled  centrifugal 


accelerations  up  to  175  g's  or  10,000  g-lbs  at  a  nominal  radius  of  39 
inches.  It  is  capable  of  reaching  a  maximum  speed  of  390  RPM. 

The  centrifuge  includes  a  welded  steel  framework  to  prevent 
vibration.  Sub-assembles  including  the  drive  motor,  the  timing  belt 
drive,  the  RPM  pick-up,  the  rotating  arm  assembly,  and  the  terminal  box 
for  control  and  test  connections  are  supported  within  this  framework. 

There  are  two  types  of  buckets  available  to  carry  the  model;  the 
Schaevitz  stationary  tyoe  and  the  swing-up  type.  In  this  study  the 
swing-up  bucket  was  used.  This  bucket  is  held  by  two  arms  attached  to 
the  spokes  by  two  pivots.  This  permits  the  soil  surface  to  remain 


perpendicular  to  the  vector  sum  of  centrifuge  acceleration  and  the 
acceleration  due  to  gravity. 
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Table  2.1  Scaling  Relations  (Reference  6) 


Quantity 

Full  Scale 
(Prototype) 

Centrifugal 
Model  at  n  g's 

Linear  Dimension 

1 

1/n 

Area 

1 

2 

1/n 

Volume 

1 

1/n3 

Time 

In  Oynamic  Terms 

1 

1/n 

In  Diffusion  Cases 

1 

1/n2 

In  Viscous  Flow  Cases 

1 

1 

Velocity  (Distance/Time) 

1 

1 

Acceleration  ( Oistance/Time  ) 

1 

n 

Mass 

1 

3 

1/n 

Force 

1 

,/n2 

Energy 

1 

1/n3 

Stress  (Force/Area) 

1 

1 

Strain  (Displacement/Unit  Length)  1 

1 

Density 

1 

1 

Energy  Oensity 

1 

1 

Freauency 

In  Oynamic  Terms 

1 

n 
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Hydraulic  and  electrical  services  are  available  to  the  model  in 


flight.  The  hydraulic  lines  may  be  used  to  conduct  compressed  air  or 
fluids  from  the  outside  control  area  to  the  model.  Eighteen  electrical 
channels  are  available  for  sending  power  to  and  receive  signals  from 
transducers  which  monitor  behavior  of  the  model.  Electrical  signals 
are  transmitted  to  the  centrifuge  rotor  and  then  to  the  model  in  flight 
through  a  stack  of  slip  rings.  Hydraulic  services  are  transmitted 
through  four  rotary  journals.  A  general  view  of  the  centrifuge  and 
control  panel  is  shown  in  Figure  2.1. 

2.  Photographic  and  Video  Recording  Systems 

A  still  photographic  system  is  available  to  permanently  record 
selected  moments  of  the  centrifuge  model  tests.  A  camera  is  mounted 
near  the  hub  of  the  centrifuge.  Thus,  still  photographs  can  be  taken 
with  an  on-board  camera-flash  unit  by  remote  control  during  the  tests. 
The  photographs  may  be  used  later  for  analyses.  In  this  study  a 
photograpic  system  was  not  used.  However,  a  Sony  television  camera  and 
video  recording  device  were  used  as  the  monitoring  system.  This  video 
camera  was  mounted  near  the  hub  of  the  centrifuge.  It  provided  not 
only  a  continuous  and  instantaneous  monitor  of  the  test  while  in 
progress  but  also  a  permanent,  replayable  record  of  the  model  tests. 

C.  Model  Box,  Concrete  Box  Culvert  and  Strain  Gages 

A  centrifuge  model  box  which  had  been  used  in  a  prior 
investigation  at  The  University  of  California,  Davis  was  used  to 
contain  the  soil  model.  The  model  box  was  made  of  1/4  inch  thick 
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aluminum  alloy,  and  was  designed  to  operate  under  a  maximum  centrifugal 
loading  of  100  g.  The  dimensions  of  the  model  box  were  15  inches  long 
by  15  inches  wide  by  10  inches  high. 

The  model  box  culvert  was  made  of  Quikrete,  a  commercial 
ready-to-use  sand  (topping]  mix,  with  water-cement  ratio  of  0.15  (by 
weight).  The  model  box  culvert  consisted  of  a  roof,  floor,  and  two 
side  walls  and  the  exterior  dimension  of  the  culvert  were  9  inches 
(length)  by  5  inches  (width)  by  5  inches  (height).  The  thickness  of 
these  slabs  was  0.4  inch. 

A  commercial  strain  gage  (Gage  Type  CEA-13-125UW-120)  made  by 
Measurements  Group,  Inc.  was  used  to  measure  the  strains  on  the 
surfaces  of  the  culvert.  The  strain  gages  were  placed  at  the 
mid-sectio'i  of  the  culvert.  Figures  2.2  and  2.3  show  the  dimensions  of 
the  model  box  culvert  and  location  of  the  strain  gages,  respectively. 
Symmetry  was  assumed. 
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0.  Microcomputer  Based  Data  Acquisition  System 

At  least  fourteen  strain  gages  (seven  exterior  and  seven  interior 
gages)  were  required  to  measure  the  strains  for  the  model  study. 
However,  these  instruments  faced  two  very  difficult  problems:  1)  a 
limited  number  of  slip  rings  were  available  for  data  transmission  and, 
2)  brush  noise  caused  by  dynamic  vibration  occurred  in  the  area  in 
which  the  brush  is  in  contact  with  the  slip  ring.  To  overcome  these 
problems,  a  microcomputer-based  time  division  data  acquisition  system 
(which  works  as  a  synchronized  channel  selector  as  shown  in  Figure  2.4) 
was  designed  by  Li  (Reference  7)  and  installed  by  Ju  (Reference  8)  for 
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Demultiplexer 


tha  model  study.  Details  of  the  system  are  described  in  Reference  9, 
and  a  brief  description  of  the  system  is  illustrated  below. 

Referring  to  Figure  2.5,  the  transducers  are  connected  to  the 
corresponding  signal  conditioning.  Conditioned  signals  are  picked  up 
in  a  sequential  order  by  the  16-channel  multiplexer  and  then  fed 
through  the  voltage  follower  which  is  linked  to  a  pair  of  slip  rings. 
Signals  transmitted  through  the  slip  rings  are  received  by  the  A-0 
converter  which  is  connected  to  a  microcomputer .  The  synchronization 
signal  comes  from  a  pulse  generator  (output  from  a  channel  of  the  D-A 
converter).  Each  pulse  causes  the  shifting  of  one  channel  of  the 
multiplexer.  At  any  given  instant  only  one  channel  of  the  16-channel 
multiplexer  is  connected  to  A-D  converter.  For  this  system,  the 
synchronization  and  the  demultiplexing  functions  are  executed  by 
software  programming.  Note  that  channel  0  of  the  multiplexer  is 
connected  to  a  fixed  voltage,  and  serves  as  a  reference  mark  for  the 
computer  to  identify  the  position  of  all  channels.  Under  a  specified 
sampling  rate,  the  computer  automatically  acquires  data  from  all  the 
channels  and  converts  signal  voltages  to  actual  physical  quantities  to 
be  stored,  processed  or  tabulated  by  the  printer.  Figures  3.6  and  3.7 
show  the  multiplexer  and  data  acquisition  system  utilizing  a  Radio 
Shack  TRS-60  Model  I  microcomputer  and  a  printer,  respectively. 

E.  Soil  Properties 

The  soil  used  in  this  study  is  Monterey  No.O  sand  which  is 
classified  as  SP  in  the  Unified  Soil  Classification  System.  The  sand 
has  a  specific  gravity  of  3.65  and  a  mean  grain  diameter  of  about  0.45 


crime 


mm.  Figure  2.8  shows  the  grein  size  distribution  end  Figures  2.9  and 
2.10  show  the  data  obtained  from  the  triaxial  compression  tests  for 
Monterey  No.O  sand.  The  laboratory  tests  were  performed  by  Yang 
(Reference  10). 


F.  Model  Preparation 

The  following  steps  are  involved  in  preparing  a  models 

1 )  The  concrete  model  box  culvert  was  instrumented,  and  was 
then  placed  in  the  selected  installation  type  (embankment 
or  trench)  as  shown  in  Figures  2.11,  2.12  and  2.13. 

2)  Monterey  No.a  sand  was  pluviated  in  the  direction  normal 
to  the  axis  of  the  culvert  (see  Figure  2.14). 

3)  The  completed  sample  was  then  transferred  to  the  centrifuge 
and  placed  in  one  of  the  two  swing-up  buckets. 

4)  Instrumentation  (T.V.  monitor  and  multiplexer)  was  securely 
fastened,  and  both  static  and  dynamic  balancing  of  the 
rotating  arm  were  performed  prior  to  testing,  thus 
completing  preparation  of  the  model  system  for  centrifuge 
testing  (sea  Figure  2.  15), 

After  a  model  was  placed  in  the  swing-up  bucket  and  all  required 
insrumantation  was  securely  mounted  in  the  centrifuge,  the  model 
package  was  slowly  brought  up  to  a  rotating  speed  of  195  rpm, 
equivalent  to  60  gravitational  pulls. 


I 
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SECTION  III 


FINITE  ELEMENT  ANALYSIS 

A.  Description  of  the  Computer  Code 

The  computer  code,  CANDE  (Culvert  ANalysis  and  DEsign) ,  used  in 
this  study  was  developed  by  Katana  et  al.  (References  11  and  12).  The 
basic  assumptions  of  the  program  are:  plane  strain  geometry  and 
loading,  small  displacement  theory,  and  quasistatic  response.  The 
following  description  summarizes  salient  features  of  CANOE  used  in  the 
analysis . 

1.  Modeling  of  Culvert 

The  box  culvert  was  modeled  as  a  series  of  straight  line  segments 
with  a  one-dimensional  beam-column  bending  element  comprising  each 
segment.  This  bending  element  employs  a  plane-strain  formulation  which 
neglects  shearing  deformations.  Two  nodes  with  three  degrees  of 
freedom  per  node  (horizontal  and  vertical  displacement  and  a  rotation) 
define  each  element.  At  each  node,  cubic  and  linear  displacement 
approximations  were  used  in  calculations  of  displacements  in  the 
transverse  and  axial  directions,  respectively.  Figure  3.1  shows  the 
coordinate  system  of  the  beam  element. 

2.  Modeling  of  Soil 

Nonconforming  quadrilateral  and  triangular  elements  were  used  to 
represent  the  soil  (see  Figure  3.2).  The  quadrilateral ,  defined  by 
four  nodes  with  two  degrees  of  freedom  (horizontal  and  vertical 


displacements )  per  node  comprise  two  triangles  with  complete, 
quadratic,  interpolation  Functions  specified  within  each  triangle. 
Application  of  appropriate  constraints  and  static  condensation 
procedures  result  in  a  four-node  quadrilateral  element  [Reference  11). 

There  are  four  material  characterizations  available  for  the  soil 
properties:  linear  elastic;  incremental  elastic  (overburden 

decendennti:  extended-Hardin ;  and  Ouncan's  hyperbolic  stress-strain 
relationship,  wniph  employs  tangent  Young's  modulus  and  tangent  bulk 
modulus  formulations  [References  12,13  and  14). 

3.  Modeling  of  Slip 

A  constrained  cinite  element  formulation,  which  is  based  on  a 
generalized  cri-cicie  of  virtual  work,  was  used  to  model  the  relative 
-ovement  of  the  soil  with  rescect  to  the  pipe  at  the  soil-culvert 
interface,  and  neiative  movement  of  the  soil  with  respect  to  the 
soil-soil  interface  (i.e.,  trench).  An  interface  element  is  defined  by 
a  set  paired  mooes  dining  two  elements  as  shown  in  Figure  3.3.  The 
paired  ■’odes,  wrier  nave  two  degree  of  freedom  per  node  (vertical  and 
rcrizc-tal  displacement ) ,  initially  take  the  same  position  in  space 
a rv  loading,  Cut  are  assigned  to  separate  elements.  Therefore, 
eac-  n ope  -0300003  individually  under  any  applied  loading.  In 
additicr,  g  t-ind  noce,  whip-  is  assigned  between  the  paired  nodes, 
provides  nomal  and  shean  forces  existing  between  the  paired  nodes.  It 
gnould  be  observed  tnat  these  interface  forces  arise  only  from  the 
ad  dinin-j  ele-ent  interacton  and  applied  forces  at  the  paired  nodes. 


4.  Modeling  of  Incremental  Construction 


CANOE  uses  incremental  iterative  solution  techniques  to  represent 
the  placing  of  the  culvert  and  embankment  in  a  series  of  soil  layers  as 
shown  in  Figure  3.4.  The  basis  of  the  techniques  is  superposition  of 
solutions  from  successive  soil  layers  and  a  newly  added  layer.  At  each 
increment,  iterative  calculations  determine  soil  and  culvert  moduli 
until  equilibrium  is  approximated  within  an  allowable  error. 

0.  Finite  Element  Parameters 

1.  Finite  Element  Mesh  and  Boundary  Conditions 

The  finite  element  grid  with  boundary  conditions  usea  in  this 
study  is  shown  in  Figure  3.5.  Since  the  model  and  its  loading  is 
symmetric,  only  half  of  the  model  was  analyzed.  Boundary  conditions  on 


the  culvert  used 

in 

the 

analysis  are  shown  in 

the  figure: 

a  fixed 

movement  condition 

in 

the 

horizontal  direction 

and  free 

movement 

condition  in  the  vertical  direction.  The  culvert  was  represented  by  20 
beam-column  elements,  and  the  soil  by  110  quadrillateral  elements. 

2.  Soil-Culvert  Interface  and  Incremental  Solution  Procedure 

A  fixed  condition  was  used  at  the  soil-culvert  interface. 
Although  it  is  possible  to  represent  the  slip  betwen  the  continuum  and 
beam  elements,  a  current  study  has  demonstated  that  the  influence  of 
slip  conditions  for  this  particular  geometrical  configuration  are 
insignificant  (Reference  15).  Due  to  large  amounts  of  CPU  (Central 
Processing  Unit)  time,  and  substantial  computational  costs  when  slip 
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was  allowed,  the  fixed  condition  was  used  for  the  analysis 


The  incremental  solution  procedure  for  embankment  and  trench 
simulated  the  actual  installation  process  of  placing  soil  layers  in  a 
series  of  lifts.  Figures  3.S  and  3.7  show  the  construction  increment 
numbers  of  element  groups  entering  sequentially  into  the  system.  The 
first  construction  increment  included  placing  all  bedding  pad,  in  situ 
soil,  and  the  box  culvert  elements.  Subsequent  increments,  numbers  5 
through  10,  were  gravity  loaded  elements  of  fill  soil. 

3.  Material  Properties 

The  soil  model  employed  in  the  study  is  a  character ization 
proposed  by  Duncan  et  al.  (References  13  and  14]  which  has  had  a 
substantial  history  of  development  and  application  over  the  last 
decade.  This  soil  model  characterizes  soil  behavior  with  a  variable 
tangent  Young's  modlus  and  tangent  bulk  modulus.  Eight  parameters  are 
needed  to  define  a  part  cular  soil  in  loading:  K,  n,  ,  c,  0,  and  Att 
for  the  tangent  Young's  modulus;  and  K  and  m  for  the  tangent  bulk 
modulus.  These  parameters  can  be  determined  from  data  obtained  by 
conventional  triaxial  tests.  Table  3.1  shows  the  parameters  used  for 
Monterey  No.O  sand  in  the  analysis.  These  parameters  were  determined 
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SECTION  IV 


RESULTS  ANO  DISCUSSION 

This  section  presents  results  from  the  numerical  analysis  and 
centrifuge  model  study  whose  purpose  was  to  investigate  the  influence 
of  installation  types  (embankment  and  trench)  and  soil  types  on  the 
structural  behavior  of  a  typical  box  culvert.  The  input  parameters  for 
the  centrifuge  model  study  are  same  as  those  in  the  Section  II.  The 
numerical  results  obtained  from  CANOE  in  Section  IV. 8  are  based  on  the 
input  parameters  discussed  in  the  Section  III. 8.3  and  the  input 
parameters  used  for  the  study  of  soil  type  influence  are  described  in 
Section  IV. C. 

A.  The  Influence  of  Installation  Type 
1.  Bending  Moment  Distribution 

The  bending  moments  developed  in  the  concrete  culvert  were 
determined  from  the  results  of  centrifuge  model  study  and  predictions 
of  numerical  analyses.  Figures  <1.1  to  4.9  visually  report  the 
variation  of  moments  with  deoth  of  fill  for  nine  locations.  Figure 
4.10  shows  the  bending  moments  around  the  culvert  under  a  simulated 
fill  height  of  20  feet. 

Figure  4,1  shows  the  moments  for  the  midspan  of  the  top  slab.  The 
moments  are  initially  "egligible,  and  subseqently  increase  almost 
linearly  with  the  backfilling  process.  All  the  moments  are  positive 
throughout  the  incremental  constructions  due  to  the  vertical  3oil 
pressure  which  induced  inward  deflection  of  the  top  slab.  No  negative 


moments  were  detected  during  the  first  six  construction  increments  at 


which  the  fill  height  reached  the  same  elevation  of  the  top  span  of  the 


culvert.  This  indicates  that  the  oox  culvert  was  rigid  enough  to 


resist  the  inward  forces  on  the  sides  of  the  culvert  under  lateral  soil 


pressure. 


The  largest  moment  is  developed  at  the  upper  corner  of  the  culvert 


as  shown  in  Figure  4.3.  As  expected,  the  momenta  are  negative 


throughout  the  Packfill  process. 


Figures  4.7  and  4.9  show  the  moments  developed  at  the  co"ner  and 


midspan  of  the  bottom  slab  of  the  culvert,  respectively.  The  results 


are  interesting  since  the  magnitude  of  those  moments  are  much  smaller 


than  the  moments  at  the  corner  and  midspan  of  the  top  slab  of  the 


culvert.  This  confirms  that  the  soil  pressure  exerted  on  the  bottom 


slab  is  a  function  of  bedding  parameters  which  are  important  for 


culvert  design. 


The  comparison  between  the  results  of  centrifuge  model  study  and 


numerical  predictions  is  made  on  the  figures.  Typically,  Figure  4.10 


snows  the  compared  moments  around  the  culvert  under  fill  height  of  20 


feet.  Although  agreement  between  these  two  results  are  not  excellent 


in  magnitude,  centrifuge  model  and  finite  element  results  are  in 


lOderately  good  agreement  for  shape. 


No  major  difference  in  structural  behavior  was  observed  under  two 


different  installation  types,  embankment  and  trench.  This  result  may 


indicate  that  the  influence  of  the  installation  type  to  overall 


behavior  of  the  box  culvert  is  minimal  although  the  installation  type 


is  one  of  the  more  important  parameters  to  be  considered  for  circular 


culverts.  However,  it  should  be  pointed  out  that  the  embankment 
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igure  4.3  Culvert  Bending  Moments  at  the  Upper  Corner 
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ure  4. a  Culvert  Bending  Moments  at  Strain  Gage  #3 
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Figure  4.5  Culvert  Sending  Moments  at  Strain  Gage  #4 


'■  +H 
-H 


Embankment  (FEM) 
Trench  (FEM) 


Fill  Height,  H  (ft) 


•  Er.b  kment  (Centrifuge) 
O  Trench  (Centrifuge) 


Ffigure  4,6  Culvert  Bending  Moments  at  Strain  Gage  -5 
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Figure  4.7  Culvert  Bending  Moments  at  Bottom  Corner 


2  40.0, 


4-: 


_  Embankment  (FEM) 

- Trench  (FEM) 


^  20.0 


•  Embankment  (Centrifuge) 
O  Trench  (Centrifuge) 


-10.0 


Fill  Height,  H  (ft) 


Figure  4.8  Culvert  Bending  Moments  at  Strain  Gage  #6 


23.37 


Embankment  (FEM) 
Trench  (FEM) 


Figure  4,9  Culvert  Bending  Moments  at  Strain  Gage  #7 
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condition  produces  slightly  greater  loading  conditions. 

2.  Thrust  Distribution 

The  thrusts  developed  in  the  concrete  box  culvert  were  determined 
from  the  results  of  the  centrifuge  model  study  and  predictions  of 
numerical  analyses.  Figures  4.11  to  4.15  report  the  variation  of 
thrusts  with  depth  of  fill  for  five  locations,  while  Figure  4.16  shows 
the  thrusts  around  culvert  under  fill  height  of  20  feet. 

Figures  4.11  and  4.12  show  the  thrusts  at  the  midspan  and  corner 
of  the  top  slab  of  the  box  culvert.  The  thrusts  begin  with  compressive 
(positive)  farces,  but  once  the  depth  of  fill  height  exceeds  the  crown 
height  of  the  culvert,  the  thrusts  become  tensile  (negative)  forces. 

A  larger  thrust  was  observed  at  midspan  of  the  vertical  wall  as 
shown  in  Figure  4.13.  No  compressive  (positive)  forces  were  detected 
during  the  early  incremental  constructions.  A  drastic  increase  of 
tensile  (negative)  forces  may  be  observed  as  further  backfill  is  placed 
over  the  box  culvert. 

The  thrust  distribution  around  the  culvert  for  fill  heights  under 
20  feet  is  shown  in  Figure  4,16.  All  thrusts  are  tensile  (negative) 
forces  and  the  largest  tensile  force  occured  at  approximately  one-third 
of  the  vertical  wall  height  from  the  bottom. 

The  results  of  centrifuge  model  study  are  plotted  on  the  figures. 
They  are  similar  to  those  in  Section  IV.A.1:  moderately  good  agreement 
in  shape,  but  not  excellent  agreement  in  magnitude. 

Again,  no  measure  difference  in  structural  behavior  is  observed 
between  embankment  and  trench  installations  except  that  the  embankment 
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Figure  4.11  Culvert  Thrusts  at  Strain  Gage  #1 
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Figure  4.12  Culvert  Thrusts  at  Upper  Corner 
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Figure  4.13  Culvert  Thrusts  at  Strain  Gage  #4 
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Figure  4.14  Culvert  Thrusts  at  Bottom  Corner 
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figure  4.  18 


Soil  Pressure  Distribution  around  the  Culvert 
at  Fill  Height  =  30  ft 


23.48 


the  bottom  of  the  culvert.  One  possible  explanation  is  that  since  the 
culvert  deforms  downward,  it  is  more  likely  to  mobilize  passive 
pressures  in  the  soil  adjacent  to  the  bottom  corner,  with  a  resultant 
higher  coefficient  of  soil  pressure  than  is  character istic  of  the 
active  state. 

2.  Shape  of  the  Deformed  Culvert 

Figure  4.19  shows  crown  deformation  versus  the  depth  of  fill.  SM 
soil  type  (silty  sand)  shows  a  rising  crown  deflection  until  the  fill 
height  reaches  the  crown  level  of  the  culvert,  followed  by  a  downward 
linear  deformation  due  to  the  vertical  soil  pressure  of  backfill.  By 
comparison,  Gw  soil  type  (coarse  aggregate)  shows  no  rising  crown 
deflection.  The  deflection  of  GW  soil  type  at  BO  feet  of  fill  height 
is  aoout  two  times  larger  than  the  deflection  of  SM  soil  type.  With 
tne  soil  pressure  previously  observed,  this  confirms  that  greater 
deflection  of  tre  culvert  would  be  developed  from  the  higher  soil 
pressure . 

Figure  4.20  shows  the  final  shape  of  deformed  culvert  under  the 
fill  height  =f  20  ceet.  From  this  comparison  study  it  is  evident  that 
tne  type  of  soil  is  one  of  major  factors  governing  the  behavior  of  a 
box  culvert,  and  is  an  imcortant  factor  for  analysis  and  design  of  a 
box  culvert. 

3.  Bending  Moment  and  Thrust  Distribution 

Figures  4.21  to  4.25  report  the  bending  moments  versus  the  depth 
cf  fill  at  five  locations,  and  Figure  4.26  shows  the  bending  moment 
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Figure  4.23  Culvert  Bendirg  Moments  at  Strain  Gage  #4 
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Figure  4.24  Culvert  Bending  Moments  at  Bottom  Corner 
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Figure  4.25  Culvert  Bending  Moments  at  Strain  Gage  #7 
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Figure  A. 29  Culvert  Thrusts  at  Strain  Gage  #4 
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SECTION  V 


SUMMARY,  CONCLUSIONS  AND  RECOMMENDATIONS 


A.  Summary  and  Conclusion 


This  report  presents  an  investigation  of  the  behavior  of  a 
concrete  box  culvert  under  backfill  loads.  A  centrifuge  model 
technique  is  used  to  simulate  a  prototype  structural  box  culvert,  and 


the  measured  structural  responses  are  compared  with  predictions  of 
finite  element  analyses.  Findings  and  conclusions  from  this 
investigation  are  as  fallows: 

1.  The  results  of  the  centrifuge  model  study  agree  moderately  well 
in  shape,  but  some  differences  in  magnitude  are  observed  when  they  are 
compared  with  the  results  of  finite  element  analyses. 

2.  No  major  difference  in  structural  behavior  is  observed  between 
trench  and  embankment  soil  installation  from  both  the  centrifuge  model 
study  and  numerical  analyses  except  that  embankment  soil  installation 
produces  slightly  higher  loadings. 

3.  Maximum  bending  moment  is  observed  at  the  upper  corner  of  the 


culvert  as  expected. 

4.  Centrifuge  model  study  and  numerical  analyses  show  that  all 
thrusts  around  the  culvert  below  a  fill  height  of  20  feet  are  negative 


(tensile)  forces  due  to  deflection  of  the  slab  members  by  soil 


pressures . 


5.  Significantly  different  shapes  of  the  deformed  culverts  are 


observed  from  the  finite  element  analyses  when  different  soil  stiffness 
is  used  in  CANDE.  This  indicates  that  soil  type  is  one  of  important 


23.61 


/  y 


.  -V-V  / 


\  \  *.  *,  ■ .  . 


>  ^  .  *  .  •  .  »  .«  '»  „  «  ->•  „  ■  V*  .•  »*  . 

's'  •/  ■  r.-1.  .  -  .  •  .  -  .  - 


:'j  .  1 V.'.'.V  -  V\-_V 


references 


1.  Coles,  C.K.,  "Centrifuge  Models  of  a  Spile-Reinforced  Tunnel,"  * 

M.S.  Thesis,  University  of  California,  Oavis,  June,  1982. 

2.  Kin,  M.M.  and  Ko,  H.Y.,  "Centrifugal  Testing  of  Soil  Slope 

Models,"  Transportation  Research  Record  872,  pp.  7-15,  1982. 

3.  Rowe,  P.W.  and  Craig,  W.H.,  "Application  of  Models  to  the  * 

Prediction  of  Offshore  Gravity  Platform  Foundation  Performance,"  , 

International  Conference  on  Offshore  Site  Investigation,  1 

po.  269-281,  Graham  and  Trotman,  London,  1980  ' 

I 

t 

4.  Shen,  C.K.,  Kim,  Y.S.,  Sang,  S.  and  Mitchell,  J. ,  "Centrifuge  : 

Modeling  of  a  Lateral  Earth  Support,"  Proceedings  of  the  ASCE, 

Journal  of  the  Geotechnical  Engineering  Division,  Vol.  108, 

No.  GT9,  pp.  1150-1164,  September,  1982. 

5.  Janes,  R.G.,  and  Larsen,  H. ,  "Centrifugal  Model  Tests  of  Buried 
Rigid  Pipes,"  Proceedings  of  the  Ninth  International  Conference 
on  Soil  Mechanics  and  Foundation  Engineering,  Tokyo,  Japan,  1977. 

5.  Scott,  R.F.,  and  Morgan,  N.R.,  "Feasibility  and  Desirability  of 
Constructing  a  Very  Large  Centrifuge  for  Geotechnical  Studies," 

Report  760-170  NSF,  California  Institute  of  Technology  and  JPL, 

March,  1977. 

7.  Li,  X.S.,  Personnal  communication,  Department  of  Civil 
Engineering,  University  of  California,  Oavis,  California,  1985. 

8.  Ju,  Personnal  communication,  Department  of  Civil 
Engineering,  University  of  California,  Davis,  California,  1985. 

9.  Shen,  C.K.,  Li,  X.S.  and  Kim,  Y.S.,  "Microcomputer  Based  Oata 
Acouisitian  Systems  for  Centrifuge  Modeling,"  Proceedings  of 
the  ASTM ,  Geotechnical  Testing  Journal,  Volume  7,  Number  4, 
dp,  200-204,  Oecember ,  1984, 

10.  Yang,  F.,  Personnal  communication,  Department  of  Civil 
Engineering,  University  of  California,  Davis,  California,  1985. 

11.  Katona,  M.G.,  Smith,  J.M.,  Qdello,  R.J.,  and  Allgood,  J.R., 

"CANOE  -  A  Modern  Aoproach  for  the  Structural  Design  and  Analysis 
of  Buried  Culverts,"  Report  No.  FHWA/RD-77/5 ,  Federal  Highway 
Administration,  Washington,  D.C.,  October,  1976. 

12.  Katona,  M.G.,  Vittes,  P.D.,  Lee,  C.H.,  and  Ho.  H.T.,  "CANDE-1980: 

Box  Culverts  and  Soil  Models,"  Report  No.  FHWA/RD-80/1 72 ,  Federal 
Highway  Administration,  Washington,  D.C.,  May,  1981. 


23.63 


Duncan,  J.M.,  et  al.,  "Strength,  Stress-Strai n  ana  Bulk  Modulus 
Parameters  for  Finite  Element  Analyses  of  Stresses  and  Movements 
in  Soil  Masses,"  Report  No.  UC8/GT/78-Q2 ,  National  Science 
Foundation,  April,  1973. 

Wong,  K.S.  and  Duncan,  J.M.,  "Hyperbolic  Stress-Strain 
Parameters  for  Nonlinear  Finite  Element  Analysis  of  Stresses 
and  Movements  in  Soil  Masses,"  Report  No.  TE-74-3,  University 
of  California,  Berkeley,  July,  1974. 

Gardner,  M.P.  and  Jeyapalan,  «.,  "Preliminary  Analysis  of  the 
Behavior  of  Reinforced  Concrete  Box  Culverts,"  Report  No. 
FHWA/TX-82/50+326-1 ,  September,  1982. 


1984  USAF-SCEEE  FACULTY  SUMMER  SUPPORT  PROGRAM 


Sponsored  by  the 

AIR  FORCE  OFFICE  OF  SCIENTIFIC  RESEARCH 
Conducted  by  the 

SOUTHEASTERN  CENTER  FOR  ELECTRICAL  ENGINEERING  EDUCATION 

FINAL  REPORT 

EFFECTS  OF  FLUID  SHIFTS  AND  HYPOVOLEMIA  IN  INDIVIDUALS 
WITH  DIFFERENT  WORKING  CAPACITIES  WHILE  RESTING 
AT  A  FIVE  DEGREE  DECLI NATION 


Prepared  by: 

Academic  Department: 
University: 

Research  Location: 


USAF  Research  Contact: 
Date: 

Contract  No.: 


William  G.  Squires,  Ph.D. 

Biology 

Texas  Lutheran  College 
Aerospace  Physiology  Laboratory, 
Biomedical  Division, 

Crew  Technology  Branch 
Sarah  Nunneley,  Ph.D. 

1985 

84  RIP  24 
F49620-82-C-0035 


EFFECTS  OF  FLUID  SHIFTS  AND  HYPOVOLEMIA  IN  INDIVIDUALS  WITH 


DIFFERENT  WORKING  CAPACITIES  WHILE  RESTING 
AT  A  FIVE  DEGREE  DECLINATION 
by 

William  G.  Squires 
ABSTRACT 

Data  from  actual  space  flight  studies  have  demonstrated 
functional  abnormalities  and  changes  of  the  cardiovascular 
system  immediately  post-flight.  Interest  lies  in  what  occurs 
to  the  body  during  exposure  to  zero  gravity  that  could  account 
for  these  post-flight  alterations  in  cardiovascular  functions. 
During  zero  gravity  or  head-down  rest,  the  hydrostatic  intra- 
and  extravascular  pressure  gradients  that  are  normally  present 
in  the  upright  position  are  abolished  or  minimized.  This 
causes  a  headward  shift  of  body  fluids  from  the  lower  portions 
of  the  body  cavity.  This  massive  fluid  shift  induces  adaptive 
changes  in  other  body  systems,  such  that  re-exposure  to  normal 
gravitational  forces  produces  signs  of  orthostatic  intolerance. 
These  adaptive  changes  include  the  following:  inhibition  of 
the  renin-angiotensin  and  ADH  systems,  diuresis,  decreased 
blood  volume,  weight  loss  associated  with  diuresis  and 
decreased  blood  volume,  inhibition  of  sympathetic  activity  due 
to  decreased  levels  of  circulating  catecholamines  and  increased 
activity  of  the  carotid  sinus  nerve,  decreased  stroke  volume, 
no  change  (or  slight  increase)  in  arterial  pressure,  cardiac 
output,  or  the  contractile  state  of  the  heart,  compensatory 
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INTRODUCTION; 


The  major  focus  of  the  experiment  was  to  compare  responses 


to  zero  gravity  and  orthostatic  tolerance  post-tilt  between 


individuals  with  different  fitness  levels.  Understanding  the 


mechanisms  involved  required  elucidation  of  changes  in  plasma 


renin-angiotensin  levels,  plasma  catecholamine  levels,  body 


fluid  shifts,  and  segmental  volume  changes.  As  a  result, 


further  significance  could  be  drawn  from  this  study  regarding 


the  use  of  the  head-down  tilt  method  as  a  means  of  pre-flight 


preparation  for  the  pilot, 


With  the  advent  of  manned  space  flight  new  questions  have 


arisen  as  to  the  effects  of  zero  gravity  on  human 


cardiovascular  function.  The  adaptive  responses  of  man  to  this 


new  type  of  environment  involve  many  interrelated  and  complex 


organ  systems.  Data  from  actual  space  flight  studies  have 


shown  no  signs  of  severe  cardiovascular  impairment  but 


functional  abnormalities  and  changes  of  the  cardiovascular 


system  have  been  demonstrated  immediately 


post-flight . ® ' 9 ' ' 32  Interest  lies  in  what  occurs  to 


the  body  during  exposure  to  zero  gravity  that  could  account  for 


these  post-flight  alterations  in  cardiovascular  function. 


Because  of  time,  method,  and  other  limitations  during 


actual  space  flight  studies,  it  is  necessary  to  develop 


ground-based  simulations  of  weightlessness.  Bed  rest  and  water 


immersion  both  produce  the  same  human  responses  as  those  seen 


with  prolonged  exposure  to  zero  gravity.  However,  recent 


,•  j  /  / 


Russian  and  American  studies  have  demonstrated  that  a  slightly 
head-down  position  (from  -4°  to  -6°)  produces  effects 
qualitatively  similar  to  those  of  bed  rest  except  that  the 
adaptation  is  accelerated.  During  short-term  experiments 
head-down  tilt  produces  a  greater  degree  of  cardiovascular 
deconditioning  then  horizontal  bed  rest  of  equal  duration. 

Water  immersion  has  also  been  used  to  simulate  zero  gravity, 
though  there  are  problems  inherent  in  this  technique. 

Prolonged  immersion  is  logistically  difficult  because  of  skin 
lesions  due  to  maceration  and  presence  of  hydrostatic  pressures 
alters  respiratory  mechanisms.  The  temperature  of  the  bath  is 
also  critical.  Thermoregulatory  mechanisms  disturb  the 
hydrostatic  effects  if  the  bath  is  not  theroneutral ,  i.e.,  kept 
at  33-35°  C.  In  general,  the  comparisons  of  the  effects  of 
space  flight  and  head-down  tilt  support  the  use  of  tilt  as  a 
simulation  method  for  cardiovascular  studies  since  it,  rather 
than  bed  rest  and  water  immersion,  most  closely  resembles 
conditions  during  weightlessness. 

During  normal  erect  posture  most  blood  volume  is  usually 
maintained  below  the  level  of  the  heart.  Under  zero  gravity  or 
head-down  rest  there  is  a  headward  shift  of  body  fluids  from 
the  lower  portions  of  the  body . ^  ^  Therefore, 

blood  tends  to  pool  in  the  thoracic  cavity.  This  massive  fluid 
shift  induces  adaptive  changes  in  other  body  systems.  These 
changes  are  referred  to  in  Figure  1. 
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tilted  5°  head-down. 

A  study  simiLar  to  the  one  outlined  here  using  trained  and 
untrained  dogs  instead  of  human  subjects  as  the  experimental 
models  was  also  completed  in  the  summer  of  1985. 

II.  OBJECTIVES; 

The  objects  of  this  experiment  are  to  determine  if 
individuals  of  different  working  capacities  respond  differently 
to  head-down  tilting  and  to  elucidate  the  time  course  of  volume 
changes  in  the  right  and  left  heart,  so  that  a  correlation 
between  these  changes  with  other  biochemical  and  physiological 
changes  may  be  made.  In  this  way  a  clearer  understanding  of 
the  mechanisms  involved  with  volume  regulation  might  be  brought 
forth.  Basically,  this  study  was  a  continuaton  of  last  year's 
work . 

III.  PROCEDURES: 

A.  Human  Study;  The  experiment  will  use  a  2  D  echo 
cardiovascular  imaging  technique  that  will  measure  volume 
changes  in  the  left  heart.  Individuals  undertaking  this 
protocol  will  undergo  a  baseline  stress  test  and  2  D 
echocardiogram.  One  week  prior  to  the  actual  declination  study 
the  subject  will  perform  a  maximal  exercise  stress  test  on  the 
bicycle  ergometer  so  that  aerobic  capacity  can  be  determined. 

The  subject  will  be  asked  to  report  to  the  bedrest 
facility  at  0800  hours  on  a  pre-selected  day.  He  will  spend 
approximately  28  hours  in  the  facility  and  will  be  released  by 
approximately  1200  hours  the  following  day.  Upon  entering -the 


bedrest  facility  the  subject  will  recline  in  a  horizontal 
position  on  a  tilt-table.  He  will  be  instrumented  with  a 
standard  twelve  lead  ECG,  blood  pressure  cuff  and  strain  gauges 
to  measure  anthropomorphic  changes.  The  subject  will  then  be 
tilted  5®  head-down  and  data  collection  will  take  place  every 
15  minutes  for  the  first  hour,  every  30  minutes  for  the  next 
two  hours,  and  once  every  hour  until  1700  hours.  No  data  will 
be  collected  during  the  night.  The  following  morning  at  0800 
hours  there  will  be  another  collection  of  data.  At  0900  hours 
the  subject  will  return  to  the  horizontal  position  upon  which 
data  will  also  be  collected.  A  post-  maximal  exercise  3tre3s 
test  on  the  bicycle  ergo  meter  will  be  conducted  and  left  heart 
functioning  will  be  studied. 
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The  approach  taken  in  this  protocol  will  allow  elucidation 
of  the  time  course  of  volume  changes  left  heart  and  possible 
correlation  between  these  changes  with  other  biochemical  and 
physiological  changes. 

B.  Dog  Study:  A  healthy  mongrel  dog  (17.6  kg)  was  used  as 
an  experimental  animal.  The  animal  was  anesthesized  with 
thiamyl  sodium  (10  mg/kg  i.v.)  and  ventilated  under  positive 
pressure  through  a  cuffed  endotracheal  tube  with  a  standard 
volume  animal  respirator  (Harvard  Apparatus,  Waltham,  MA).  The 
animal  was  positioned  on  the  right  side  and  an  incision  was 
made  on  the  left  hind  leg  to  expose  the  saphenous  vein  into 
which  a  catheter  was  inserted.  The  catheter  was  connected  to  a 
two-way  stopcock  so  that  additional  thiamyl  sodium  could  be 
added  to  effect.  The  dog  was  then  placed  on  its  side  and  a 
small  neck  incision  was  made.  The  right  common  carotid  was 
exposed  and  a  pulsed  Doppler  flow  probe  tied  into  place. 

Careful  attention  was  paid  to  assure  normal  carotid  artery  flow 
velocity  with  no  constriction.  The  pulsed  Doppler  flow  probe 
was  calibrated  in  terms  of  Doppler  frequency  shift.  A  baseline 
zero  can  be  established  and  a  linear  relationship  between  flow 
and  frequency  shift  has  been  established  in  vivo.17  A  Doppler 
flow  probe  was  also  placed  on  the  right  femoral  artery  under 
direct  vision.  Precaution  was  taken  to  prevent  arterial 
constriction.  The  dog  was  again  positioned  on  the  right  side 
and  a  left  flank  incision  made  through  which  the  left  renal 


artery  was  identified  and  encircled  with  a  pulsed  Doppler  flow 
probe.  As  with  the  other  flow  probes,  careful  attention  was 
taken  to  avoid  constriction  of  the  artery.  A  catheter  was 
inserted  into  the  dog’s  urinary  bladder  so  that  urine  output 
could  be  measured.  Next,  a  catheter  was  inserted  into  the  left 
femoral  artery  and  threaded  up  into  the  aorta  for  measurement 
of  the  systemic  arterial  pressure  (Stratham  p23Db  pressure 
transducer).  Electrocardiographic  (ECG)  lead  AVF  was 
established  through  a  needle  lead  in  all  four  limbs.  A  left 
thoracotomy  was  performed  through  the  fifth  intercostal  space 
and  the  heart  was  suspended  in  a  pericardial  cradle.  With  the 
aid  of  a  purse  string  suture,  a  solid  state  pressure  transducer 
(Koingsberg  P-7,  Pasadena,  CA)  was  inserted  through  a  stab 
wound  into  the  left  ventricular  apex. 

The  instrumentation  allowed  for  measurement  of  left 
ventricular  pressure  (LVP),  left  ventricular  and  diastolic 
pressure  ( LVEDP ) ,  systemic  arterial,  systolic  and  diastolic 
pressures  (SP  and  DP),  heart  rate  (HR),  renal,  carotid  and 
femoral  artery  blood  flow  (RF,CF,FF),  urine  output  and 
calculation  of  the  first  derivative  of  left  ventricular 
pressure  (LVdP/dt).  Recordings  were  made  on  an  eight  channel 
recorder  (Gould  brush  mark  200). 

Following  instrumentation,  control  baseline  measurements 
were  made  for  five  minutes  of  LVP,  LVEDP,  SP,  DP,  HR,  CF,  RF, 
and  FF  with  the  dog  in  the  horizontal  position.  The  dog  was 
then  tilted  5°  head-down.  Measurements  were  taken  every  five 


*  ■■■  U  W  'J1  V  »  U  ■  'J  ■  rv'l  *  J9 


^7VtT7v,.'Tiv'.'T  V~W~  r~  .  .  »  «r  *  •  » 


minutes  for  one  hour.  After  one  hour  head-down  the  dog  was 
then  brought  back  up  to  the  horizontal  position  and 
measurements  were  taken  at  five  and  seven  minutes  post-tilt. 
After  the  last  measurements  were  made,  the  dog  was  euthanized 
with  a  saturated  solution  of  potassium  chloride. 


IV.  RESULTS: 

The  results  obtained  from  this  experiment  show  the 
expected  changes  in  the  cardiovascular  parameters.  The 
contractility  of  the  heart  increased,  left  ventricular  pressure 
increased,  left  ventricular  end  diastolic  pressure  increased, 
heart  rate  increased,  RF  and  CF  increased,  and  SP  and  DP 
increased  after  the  dog  was  tilted  5°  for  one  hour.  Most  of 
the  changes  occurred  during  the  first  30  minutes  head-down  and 
then  leveled  out  for  the  rest  of  the  hour.  When  the  dog  wa3 
brought  back  up  to  the  horizontal  position,  no  change  in  the 
readings  were  evident  within  five  and  seven  minutes. 


V.  RECOMMENDATIONS: 

Despite  the  many  studies  on  man's  adaptation  to  simulated 
zero  gravity,  no  conclusive  evidence  exists  as  to  the  effect  of 
physical  fitness  on  this  response  to  zero  gravity.  Although 
objective  comparisons  of  athletes  and  non-athletes  give 
variable  results,  it  has  been  suggested  that  the  more 
physically  fit  person  (high  V02>  is  less  tolerant  to 
orthostatic  stress  when  volume  depleted  as  a  result  of  diuresis 
during  head-down  rest.  This  loss  of  blood  volume  is  analogous 
to  heat-releated  volume  loss  .  ®  ^ 
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The  investigators  in  this  study  would  eventually  like  to 

find  out  if,  in  fact,  there  are  relative  physiological  and 

biochemical  changes  between  trained  and  untrained  subjects,  dog 

and  human,  and  if  so,  to  what  degree  these  parameters  vary  when 

the  subjects  go  from  the  horizontal  position  to  a  5°  head-down 

position.  Understanding  the  mechanisms  involved  requires 

elucidation  of  changes  in  plasma  renin-angiotensin  levels, 

plasma  catecholamine  levels  and  body  fluid  shifts.  As  a 

result,  further  significance  could  be  drawn  from  this  study 

regarding  the  use  of  the  head-down  tilt  method  as  a  means  of 

pre-flight  preparation  for  the  pilot. 

Studies  have  shown  that  increased  activity  of  the  carotid 
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sinus  nerve  due  to  hypervolemia  '  or  manual  stimulation  with 

42 

electrodes  results  in  a  reflex  decrease  in  the  force  of 

atrial  systole  by  a  decrease  in  sympathetic  activity  to  the 

heart  and  an  increase  in  efferent  vagal  activity  to  the  heart. 

A  suggestion  for  follow-up  research  would  be  to  isolate  the 

carotid  sinus  nerve  in  an  animal  model.  A  small  neck  incision 

could  be  made  to  expose  the  left  internal  carotid  artery  at  its 

origin  where  there  is  a  bulbous  enlargement,  the  carotid  sinus, 

2  5 

which  is  about  3  mm  in  diameter  and  4  mm  in  length.  It 
contains  an  afferent  fiber  called  either  the  carotid  sinus 
nerve  or  the  Hering  nerve  which  is  a  branch  of  the 
glossopharyngeal  nerve  (IX).  A  microelectrode  could  then  be 
placed  on  the  carotid  sinus  nerve  to  measure  its  electrical 
activity.  Then  one  could  determine  if  it  was  stimulation  of 
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I.  INTRODUCTION 


This  is  che  final  technical  report  for  Subcontract  Number  84  RIP  25 
under  the  Research  Initiation  Program.  The  research  discussed  here  is 
an  outgrowth  of  the  author's  1984  work*  as  a  Summer  Faculty  Research 
Participant  in  the  Chemical  Sciences  Directorate  of  the  Frank  J.  Seiler 
Research  Laboratory.  Research  at  the  Seiler  Laboratory  has  identified  a 
very  interesting  class  of  room-temperature  molten  salts  which  appear  to 
have  a  number  of  most  promising  applications.  The  salts  which  have  been 
studied**  are  mixtures  of  aluminum  chloride  and  methylethylimidazolium 
chloride  (MEIC),  which  at  least  in  some  concentration  ranges  are  liquid 
at  temperatures  well  below  room  temperature. 


The  substantial  promise  shown  by  these  liquids  has  prompted  a  great 
deal  of  effort  to  determine  and  understand  their  chemical  and  physical 
properties.  Careful  measurements  of  their  phase  diagram,  conductivity, 
viscosity*,  nuclear  magnetic  resonance1*  properties,  and  transport 
numbers'*  have  recently  been  published.  The  NI5R  studies  have  provided 
information  about  the  structure  of  the  melts,  and  a  systematic  analysis 
of  the  concentration  dependence  of  the  chemical  shifts  has  strongly 
suggested  the  existence  in  the  melts  of  structure,  i.e.  a  tendency  of 
the  ions  in  solution  to  form  clusters.  Specifically,  Fannin  et  al.^ 
have  proposed  that  the  anions  and  cations  tend  to  form  "chains"  of  ions 
of  alternating  sign.  The  Monte  Carlo  calculations  of  the  author*  lent 


considerable  support  to  this  picture  of  the  structure  of  the  fluid.  In 
addition,  a  simple  but  physically  reasonable  explanation  for  the 
occurrence  of  this  structure  in  terms  of  the  known  behavior  of  other 
molten  salts^’^  was  proposed.^ 

Although  these  preliminary  results  are  physically  quite  plausible 
and  most  encouraging,  what  has  been  lacking  is  a  direct  comparison  with 
experiment.  In  particular,  although  the  Monte  Carlo  code  produces  a 
quite  specific  prediction  of  the  liquid  structure  factor  of  the  current 
model  of  MEIC,  there  have  been  no  experimental  studies  of  the  structure 
of  this  substance.  In  general,  theoretical  work  is  essential  to 
understanding  the  X-ray  (or  neutron)  scattering  studies  of  the  structure 
of  liquids.  For  these  reasons,  the  author  proposed  under  the  Research 
Initiation  Program  a  coordinated  theoretical  and  experimental  program  to 
study  the  structure  of  one  of  the  simplest  of  the  molten  salts  of 
Interest,  namely  pure  molten  MEIC. 

II.  PROGRESS  MADE  UNDER  CONTRACT 

The  experimental  portion  of  the  work  was  done,  primarily  by  Dr. 

Fred  Ross,  at  the  University  of  Missouri  Research  Reactor.  Liquid  X-ray 
scattering  is  very  different  from  the  X-ray  diffraction  patterns 
produced  by  a  crystalline  solid.  In  particular,  the  intensity  is  very 
much  less,  the  Bragg  lines  are  missing,  and  the  "signal"  from  the  liquid 
is  comparable  in  magnitude  to  the  "noise"  from  the  glass  X  ray  capillary 
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cubes  used  Co  hold  Che  sample;  chls  "noise"  muse  of  course  be  measured 
and  subcracced  ouc.  For  chese  reasons,  a  conventional  GE  XRI>-6  X  ray 
dif f raccomecer  was  modified  as  follows:  first,  a  heating  stage  was 
constructed  co  keep  the  sample  molten  during  the  measurements;  second,  a 
new  detector  mounting  co  bring  the  detector  to  a  near  position  for 
higher  intensities  was  constructed;  third,  the  tubes  containing  the 
samples  were  mounted  in  contact  with  temperacure  sensors  to  monitor 
heating;  fourth,  the  scanning  in  scattering  angle  and  the  data 
collection  were  automated  and  computerized  to  permit  the  long  run  times 
needed  to  acquire  satisfactory  statistics. 

Problems  and  frustrating  delays  were  encountered  with  the 
equipment,  particularly  the  electronic  instrumentation,  and  with  the 
MEIC  (which  is  notoriously  difficult  to  handle  because  of  its  air 
sensitivity).  N’onethless,  the  following  three  major,  concrete 
experimental  results,  the  third  of  which  was  not  proposed  because  it  was 
thought  to  be  too  difficult,  were  accomplished.  First,  X-ray  scattering 
data  from  molten  MEIC  just  above  its  melting  temperature  were 
obtained.  Second,  Bragg  diffraction  lines  from  crystalline  MEIC  were 
observed  in  the  same  runs  when  the  temperature  was  lowered  to  just  below 
melting.  Third,  crystals  of  MEIC  were  grown;  pictures  taken  with  a 
precession  camera  showed  the  spots  characteristic  of  crystalline  (but 
not  single-crystal)  material.  Some  samples  are  apparently  good  enough 
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Due  to  che  aforementioned  delays,  the  experimental  data  were 
obtained  only  very  near  the  end  of  the  contract  period.  There  were 
delays,  coo,  in  acquiring  the  "theoretical  equipment"  (an  IBM  PC  and 
software)  needed  for  die  purposes  noted  in  the  proposal,  namely:  contact 
with  che  experimental  setup  and  Che  capability  to  transfer  files  of 
experimental  data;  storage,  plotting,  curve-fitting,  and  analysis  of 
experimental  data;  and  communication  with  and  file  transfer  to  and  from 
the  computer  facilities  at  the  Seiler  Laboratory.  Although  these 
problems  have  now  been  overcome,  time  has  not  yet  permitted  che  detailed 
analysis  of  the  experimental  MEIC  data  which  is  required.  But 
substantial  computational  work  on  the  extension  and  refinement  of  the 
model*-  of  a  molten  salt  has  continued.  The  results,  which  are  even  more 
striking  than  was  previously  realized,  will  be  presented  at  the  March 
1986  meeting  of  che  American  Physical  Society.8 

in.  futiae  work 


The  work  which  needs  to  be  done  most  immediately  is:  first,  the  X- 
ray  crystallography  of  crystalline  MEIC;  secondly,  obtaining  better 
statistics  for  the  liquid  phase  and  analyzing  the  data  theoretically. 

It  is  the  author's  firm  belief  that  structure  studies  will  be  of 
increased  importance  in  the  study  of  the  molten  salts  under 
investigation  as  possible  battery  electrolytes  at  the  Seiler 
Laboratory.  There  are  a  number  of  worthwhile  extensions  of  this  work, 
which,  like  the  work  here  discussed,  are  coordinated  theoretical  and 
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experimental  efforts.  The  most  immediately  and  obviously  important  are: 


l.  Ic  would  be  highly  desirable  to  do  neutron  diffraction  studies 
of  the  crystalline  phase  of  MEIC  and  neutron  scattering  studies  of  its 
molten  phase,  since  neutron  techniques  yield  information  complementary 
to  that  obtained  by  X-ray  diffraction.  This  experimental  work  could 
quite  well  be  done  at  the  University  of  Missouri  Research  Reactor:  this 
facility  has  the  highest  neutron  flux  of  all  reactors  in  American 
universities  and  was  recently  identified  by  the  National  Science 
Foundation  as  a  major  materials  research  center.  The  author  could 
perform  the  theoretical  work  necessary  to  interpret  the  neutron  data. 


2.  Because  of  Che  intended  application  of  these  molten  salts  as 
electrolytes  in  batteries,  the  question  of  their  transport  properties, 
e.g.  their  viscosity,  electrical  conductivity,  and  mobility,  is 
crucial.  As  soon  as  reasonably  accurate  intermolecular  potentials  are 
determined,  the  molecular  dynamics  method  should  be  applied  to  study 
these  transport  properties. 

3.  Finally,  of  course,  it  must  be  noted  that  the  actual  melts  of 
greatest  interest  are  more  complex:  they  include  aluminum  chloride  in 
varying  proportions.  All  of  the  above  steps  (computer  studies  of  the 
structure  accompanied  by  X-ray  and  if  possible  neutron  diffraction 
experiments  and  calculation  of  the  transport  properties)  should  be  taken 
in  the  case  of  these  melts.  Although  this  is  a  rather  large  task,  it  is 


25.6 


feasible.  The  initial  steps  we  have  taken  under  the  current  contract 


represent  a  necessary  first  step  and  a  very  good  start  on  this  project 


and  the  author  feels  that  the  preliminary  results  discussed  here 


strongly  justify  extension  of  the  present  effort, 


IV.  SUMMARY  AND  CONCLUSIONS 


Under  this  Research  Initiation  Program  contract,  we  have  obtained 


experimental  data  on  the  molten  phase  of  MEIC  and,  although  it  was  not 


expected,  on  its  crystalline  phase.  The  author  has  continued,  refined. 


and  extended  Monte  Carlo  calculations  on  clustering  phenomena  in  molten 


salts.  Experimental  equipment  has  been  modified  to  study  X-ray 


scattering  from  liquids,  and  "theoretical  equipment"  has  been  acquired 


to  make  possible  close  coordination  between  theoretical  and  experimental 


efforts  at  the  University  of  Missouri  and  interaction,  particularly 


computational,  with  the  Seiler  Laboratory.  The  major  goal  of  the 


Research  Initiation  Program  has  been  fully  achieved:  within  Che  budget 


permitted  by  the  RIP  (and  with  some  contributions  from  the  University  of 


Missouri),  we  have  laid  the  foundation  for  further  work,  and  we  feel 


that  the  results  we  have  achieved  justify  extension  of  this  work.  We 


are  most  grateful  to  the  Air  Force  Office  of  Scientific  Research  for 


this  program;  to  SCEEE  for  its  most  efficient  management  of  it;  and  to 


the  Seiler  Laboratory,  especially  Dr.  John  Wilkes,  for  their  hospitality 


and  interest  in  and  support  of  this  project, 
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The  calculation  of  inco*press ible  flows  over  airfoils  is  of  iuense 
practical  importance  to  designers  concerned  with  improved  aerodynamic  ef¬ 
ficiency  at  maneuvering  speeds.  The  most  frequently  used  approach  to  this 
problem  at  present  utilizes  the  two-dimensional  Reynolds  equation  for  the 
mean  velocity  field  in  conjunction  with  a  suitable  assumption  for  the 
Reynolds  "stress",  i.e..  the  turbulent  inertia  tensor.  In  this  method  of 
attack  upon  the  problem.  the  Nav  ier-Stokes  and  continuity  equations  are 
wr  i  t  •, en 


3u  . 
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3<J  . 


j  3Xj  p  3x  . 
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and 


3u  . 


3x  . 


-  0 


(2) 


where  u .  is  the  instantaneous  velocity  and  a.  .  --  -p<J  .  .  *  2ps  .  .  (6.  .  is  the 
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Kronecker  delta! .  The  Reynolds  decomposition  is  performed  in  the  usual 
fashion  by  letting  u  =  U  *  u ' ;  the  equations  resulting  from  these  substitu¬ 
tions  are  t i me -averaged  and  simplified  by  noting  that  the  linear  terms  in 
the  fluctuating  quantities  are  zero  for  a  statistically  stationary  process. 
It  is  important  to  note  that  the  Reynolds-averaging  procedure  must  be  long 
compared  to  the  characteristic  time  scales  of  the  turbulence,  yet  short  when 
compared  to  the  characteristic  times  of  transient  phenomena  of  interest.  In 
some  unsteady  flow  applications.  these  requirements  will  be  mutually 
incompatible.  Nevertheless,  the  result  of  the  procedure  described  above  is 


the  Reynolds  momentum  equation: 


3U. 
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311, 
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U  ,  r— -  =  -  (  -p<5  .  ,*ZnS  .  ,-pu  .u  . ) 

j  SXj  p  3Xj  *  ij  ij  i  J 


(3) 


26.2 


y.v.v.v 


1  -  *  M  *  »  «  f.  *  ,  *  •  *  .  >•■*■*.  ,«*  ***■'*»*’  fc’*  *  *  t  >  ■  »  .*  .*  .*  .*  .*  .*  .*  4 

•/•.'  ■/y  •  «.*  .  V-  . '»  »  /* 


It  is,  of  course,  the  introduction  of  the  -pu  u  terns  that  defines  the 

i  J 

closure  problem  of  turbulence  and  constitutes  the  major  difficulty  confront¬ 
ing  any  analyst  wishing  to  employ  this  method  of  attack  upon  the  problem. 
In  order  for  the  Reynolds  equation  to  be  used  for  the  calculation  of  airfoil 
flows  of  interest  it  is  necessary  to  introduce  some  kind  of  approximation 


‘or  r . 

i  J 


-pu . u  .  The  simplest  possibilities  are  descendents  of 
1  J 


Boussinesq's  eddy  viscosity  mode!  or  Prandtl's  mixing  length  model  In  the 
former,  turbulent  momentum  transport  is  modeled  by  analogy  with  Newton’s  law 
of  viscosity--- it  is  assumed  that  the  required  components  of  the  turbulent 
inertia  tensor  can  be  represented  by  transverse  gradients  of  the  mean 
velocity  field,  multiplied  by  a  turbulent  or  eddy  viscosity.  Of  course  this 
type  of  model  is  seriously  deficient  since  turbulence  is  a  characteristic  of 
the  flow  and  not  of  the  fluid.  It  has  been  noted  by  many  fluid  dynamicists, 
including  Tennekes  and  Lumley  [1972],  that  gradient  transport  models  are  not 
appropriate  for  turbulent  flow  with  multiple  length  or  velocity  scales. 
Prandtl's  mixing  length  model  is  of  the  same  general  nature,  except  that  it 
was  formulated  by  analogy  with  the  kinetic  theory  of  gases  instead  of 
Newton's  law  of  viscosity.  Although  it  depends  upon  the  mean  flow  gradient 
in  nonlinear  fashion,  it  could  hardly  be  considered  a  major  improvement 
since  fluid  particles  in  turbulence  exchange  momentum  in  continuous  fashion 
and  not  intermittently  as  is  the  case  with  colliding  gas  molecules.  Except 
under  Knudsen  flow  conditions,  the  smallest  length  scales  in  turbulence  (of 
the  order  of  the  Kolmogorov  microscale)  are  many  times  larger  that  the 
molecular  mean  free  path.  Despite  these  obvious  and  debilitating  fundamen¬ 
tal  deficiencies  such  models  are  widely  used;  Hegna  [1981],  for  example, 
chose  to  let 

au .  3u . 
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scales  or  additional  driving  forces  such  as  buoyancy  Despite  the  we;: 
known  problems  there  is  currently  a  huge  effort  underway  in  this  e<c,i.  • 
the  review  paper  by  Kline  et  a2 .  f 1981  ]  gives  some  indication  of  r 

of  investigators  working  with  the  Reynolds  equation  and  •'urtu, .  r-  ■■  •  • 

There  are  many  legitimate  questions  that  should  be  askeO  as.  • 
of  further  work  in  this  area--H  W  I.iepmann  [19791  ‘  ■ 

these  efforts  "will  be  of  passing  .nterest  or,. 
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how  gradient  transport  models  used  in  conjunction  with  the  Reynolds  equation 
will  contribute  either  to  our  understanding  of  turbulence  or  our  ability  to 
■odel  the  Important  phenomena. 

Assuming  that  a  suitable  closure  has  been  achieved,  the  analyst  is 
still  confronted  with  the  task  of  solving  an  intractable  partial  differen¬ 
tial  equation.  Finite  difference  methods  used  for  problems  of  this  type  can 
be  explicit,  implicit,  or  hybrid.  Explicit  methods  are  generally  easier  to 
program  although  they  are  subject  to  the  Courant  stability  condition  which 
restricts  the  time  increment  to 

At  <  Ax/(U+a)  (7) 

U  *  a  is  the  sum  of  the  convection  velocity  in  the  x-direction  and  the  speed 
of  sound;  a  similar  restriction  exists  in  the  y-direction.  Deiwert  and 
Bailey  [1984]  suggest  that  explicit  methods  are  a  good  choice  if  the  time 
increment  constraints  are  compatible  with  flow  frequency — At  as  given  by  (7) 
cannot  be  of  the  same  order  as  f  1 .  Generally  speaking,  the  thin  shear 
layers  found  at  high  Re  result  in  a  prohibitive  Courant  condition  and  im¬ 
plicit  or  hybrid  methods  must  be  used.  Beam  and  Warming  [1978]  have  devised 
an  ADI  sequence  for  treating  the  compressible  Navier-Stokes  equations  in 
conservation-law  form;  although  the  alternating-direction  implicit  or 
Peaceman-Rachf ord  [1955]  method  is  readily  implemented  for  linear  parabolic 
PDE's  such  as  the  heat  conduction  equation,  the  nonlinear  character  of  the 
Navier-Stokes  equations  is  a  serious  obstacle.  Beam  and  Warming  used  a 
truncated  Taylor  series  expansion  to  achieve  linearization  but  they  also 
caution  that  the  cross-spatial  derivatives  (e.g.,  SUj/Bx^  complicate  con¬ 
struction  of  an  efficient  algorithm.  They  employ  an  explicit  representation 
for  these  terms  without  adversely  affecting  numerical  stability. 


An  alternative  hybrid  aethod  developed  by  MacCoraack  [1978]  and  used  by 


Hegna  [1981],  Shang  [1978],  and  others,  utilizes  equation  splitting — an 


explicit  foraulation  is  used  for  regions  doainated  by  convection  and  the 


shear  layer  is  treated  iaplicitly.  Deiwert  and  Bailey  [1984]  note  that  it 


is  difficult  to  efficiently  iapleaent  this  procedure  on  aodern  array 


processors.  They  also  note  that  finite  difference  aethods  in  general  suffer 


from  aliasing  of  high  frequency  energy  to  larger-scale  notions  since  the 


grid  or  nesh  with  N  nodal  points  can  at  aost  support  N/2  haraonlcs  of  the 


fora  e 


There  are  alternatives  to  the  Reynolds  equation-turbulence  aodellng 


approach;  these  include  sub-grid  scale  closure  aodels,  direct  nuaerical 


simulation  of  the  Navier-Stokes  equations,  and  the  spectral  aethod. 


Deardorff  [1970]  has  been  the  principal  proponent  of  sub-grid  scale  closure- 


in  this  aethod,  the  large  scale  notions  are  explicitly  obtained  fron  the 


Navier-Stokes  equations.  The  very  snail  scale  motions  are  treated  statisti¬ 


cally  and  in  this  Banner  the  Reynolds  number  limitations  of  a  total 


numerical  simulation  are  avoided.  Orszag  [1977],  among  others,  speaks  in 


favor  of  this  approach,  noting  that  the  dissipative  eddies  are  less  than 


satisfactory.  For  purposes  of  illustration  we  now  consider  Deardorff's 


treatment  of  planar  Poiseuille  flow.  First,  the  dependent  variables  are 


averaged  spatially  over  the  grid  spacing: 


x  •  *tAx  , 
l  2  I 


u(x.y,x,t)  -  (1/AxAyAz)  JJJ  u ( x , y , z , t Jdxdydz 
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The  Navier-Stokes  equations  can  then  be  written: 


i  3  1  a  *2  1 
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In  (9).  the  ter*s  u'.u'j  represent  deviations  from  the  grid-volume  aeons, 
i.e.,  the  sub-grid  scale  turbulent  inertia  tensor;  its  coaponents  are 


aodeled  as 

3u.  3u. 

UiUj  '  <1/3’ViUi  =  -K<3^  <10> 

where  K  is  the  sub-grid  scale  eddy  coefficient.  It  is  assuaed  that 

3u  3u  3u 

K(x.y.z. t)  =  (CA)  (5^(3^  *  3 x"  {U) 

Certainly  in  this  respect,  the  SGS  aodel  is  not  that  auch  superior  to  first- 
order  turbulence  node  ling  used  in  conjunction  with  the  Reynolds  aoaentua 
equation.  Deardorff  found  that  a  value  of  c=0.10  provided  realistic  results 
in  the  integration;  larger  values  were  found  to  produce  excessive  energy  in 
the  sub-grid  scale  motions.  It  is  essential  to  remember  that  this  method 
has  been  applied  to  channel  flows  and  atmospheric  phenomena-- its  application 
to  thin  shear  flows  such  as  turbulent  boundary  layers  will  be  considerably 
more  difficult . 

One  would  anticipate  great  difficulty  in  the  direct  simulation  of  the 

Navier-Stokes  equations,  since  in  the  past  150  years,  only  about  75  analytic 

solutions  to  the  equations  have  been  found--a  tribute  to  the  intractability 

of  simultaneous  nonlinear  partial  differential  equations.  The  pursuit  of 

numerical  solutions  to  the  full  set  of  equations  is  hindered  by  the  rapid 

increase  in  degrees  of  freedom  (nodal  points  in  finite  difference  aethods) 

with  Reynolds  number  Schuaann  et  aj. .  [1980],  I.iepaann  (1979),  and  Orszag 

(1977)  have  all  noted  that  the  required  degrees  of  freedom  scales  with 
9/4 

Re  If  it  were  possible  to  deal  with  a  flow  where  Re«100  with  1000 

interior  aesh  points,  the  scaling  law  suggests  that  Re-10*  would  require 

7 

about  3  x  10  aesh  points  In  fact,  Orszag  notes  that  an  order  of  magnitude 
Increase  in  coaputat iona 1  power  will  permit  an  increase  in  Re  of  only  2.15 


tines  and  Schuaann  et  al.  note  that  a  brute-force  alaulatlon  on  a  10  MIPS 


4 

aachine  for  Re«10  would  require  about  3  years  coaputlng  tlae.  There  are 
grounds  for  optlaisa,  however,  for  free  flows  and  flows  in  decay,  where 
either  the  Re  is  saall  or  the  large  scale  notions  can  be  treated  independ¬ 
ently  of  the  dissipative  structure.  There  is  less  reason  to  be  optiaistic 
about  success  in  direct  siaulation  of  flows  about  objects:  for  turbulent 
boundary  layers  or  laalnar  boundary  layers  undergoing  transition,  the  rapid 
changes  in  the  streaawise  direction  cause  difficulties  in  resolution. 
Furtheraore,  the  downstreaa  or  outflow  boundary  conditions  would  appear  to 
require  complete  specification  in  the  wake  region--with  the  concoaaitant 
danger  that  the  flow  will  be  over -spec i f  ied  and  the  results  of  the  direct 
simulation  set  in  advance. 

It  appears  that  for  the  present  purposes,  the  probability  of  "success" 
with  either  direct  siaulation  or  sub-grid  scale  closure  aethods  is  very 
saall  And  although  the  Reynolds  equation  with  turbulence  aodellng  has  been 
and  is  being  widely  eaployed.  it  too  suffers  froa  soae  serious  probleas 
which  can  be  summarized  as  follows: 

1)  Correct  paraaeters  for  the  eddy  viscosity  aodel(s)  will  have  to  be 
deterained  for  any  flow  that  differs  in  pressure  gradient  froa  those  pre¬ 
viously  treated 

2)  There  is  reason  to  question  iapleaentat ion  of  down  stream  boundary 
conditions  due  to  the  danger  of  over-specification  and  the  possible  upstream 
propagation  of  artificial  velocity  constraints. 

3)  The  averaging  process  used  to  obtain  the  Reynolds  equation  from 
Navier  -Stokes  automatically  entails  loss  of  information  and  it  is  not  at  all 
clear  how  pervasive  this  will  be  with  respect  to  the  integral-scale  notions 
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It  is  clear,  however  that  the  governing  PDE  will  be  wrong  the  instant  any 
first-order  closure  scheme  is  incorporated  for  the  turbulent  Inertia  tensor. 

4)  Deiwert  and  Bailey  [1984],  among  others,  have  noted  that  the  ap¬ 
plication  of  the  Reynolds  equation  has  been  limited  to  two-dimensional  flows 
without  freestrcam  turbulence  or  other  perturbation.  This  type  of  simula¬ 
tion  has  resulted  in  cyclic  unsteadiness  with  a  single  dominant  frequency 
More  complicated  flows  will  necessitate  removal  of  the  Reynolds-averaglng 
restrict  ion . 

5)  Discrepancies  at  higher  angles  of  attack  in  Reynolds  equation 
modeling  have  been  noted  by  Cebeci  et  a_l.  [1984]  and  Shang  [1984]. 

RFVIF.W  OF  LITERATURE 

For  the  above  reasons  the  decision  was  made  to  explore  the  spectral 
methods  described  in  the  monograph  of  Gottlieb  and  Orszag  [1977]  and  the 
review  of  Gottlieb  et  a_l  [1984].  Spectral  methods  have  become  Increasingly 
popular  in  recent  years  resulting  in  studies  of  transitional  fluid  flows 
[20.32,391,  incompressible  fluid  flow  simulations  [14.22,25,34,35.36.38,53.54], 
and  most  recently  for  complicated  compressible  flow  fields  which  include 
shock  waves  [12,13,18.45.46].  Interest  in  spectral  methods  is  due  in  part 
to  the  increased  accuracy  available  for  a  given  number  of  independent  de¬ 
grees  of  freedom  ( i  e .  the  number  of  mesh  nodes  for  a  finite  difference 
method)  m  comparison  to  finite  difference  techniques;  for  example  see 
Haidvogel  et  al.  [1980]  or  Dennis  and  Quartapelle  [1982]  for  comparisons  of 
accuracy  The  spectral  methods  are  often  referred  to  as  being  infinite- 
order  accurate,  that  Is.  if  after  N  terms  the  error  decreases  more  rapidly 
than  any  power  of  l/N.  Orszag  [1971]  states  that  it  is  possible  to  decrease 
the  computational  time  and  storage  by  an  order  of  magnitude  The  advent  of 


the  fait  Fourier  transfora  in  the  aid  60'a  allowed  the  developaent  of 
spectral  aethods.  since  rapid  evaluation  of  trignoaetric  polynoalal  coeffi¬ 
cients  becaae  possible.  Much  of  the  work  done  with  respect  to  fluid 
dynaaics  in  the  area  of  interest  has  involved  the  use  of  the  pseudo-spectral 
techniques  also  known  as  "collocation"  or  the  "aethod  of  selected  points" 

( Lanczos  [ 1956) ) 

Spectral  aethods  represent  the  solution  to  the  problea  as  a  truncated 
series  of  eigenfunctions  for  the  independent  varible.  The  type  of  series 
expansion  used  is  based  upon  the  type  of  boundary  condition  that  is  to  be 
satisfied.  for  exaaple.  a  periodic  boundary  condition  would  suggest  the  use 
of  a  Fourier  series  representation  for  the  solution.  Gottlieb  and  Orszag 
[1977)  and  Orszag  (1977)  suggest  the  following  series  representations: 
Boundary  Conditions  Series  Representation 

periodic  exp(inx) 

invtsc id  sin(nx)  or  cos(nx) 

no-slip  Chebyshev  (Tn(x))  or  Legendre  (Pn(x)) 

Pseudospectral  techniques  are  deeaed  the  aost  likely  to  be  appropriate 
for  the  problem  under  consideration;  that  of  coaputation  of  separated  flow 
on  a  pitched  airfoil  The  principal  concept  behind  pseudospectral  calcula¬ 
tions  as  stated  by  Orszag  f 1 980 )  is  to  siaply  transform  freely  between 
physical  ( x  ^ )  and  spectral  (a^)  representations,  evaluating  each  tera  in 
whatever  representation  that  tera  is  most  accurately,  and  siaply  evaluated 
Pseudospectral  coaputations  have  several  advantages  over  spectral  algo- 
rlthas:  l)  For  coaplex  geoaetry  the  solution  of  the  spectral  (Galerkln) 

aethod  requires  at  least  twice  the  nuaber  of  fast  Fourier  transforas  than 
that  of  the  pseudospectral  aethod  (collocation);  2)  Pseudospectral  tech¬ 
niques  have  significant  advantages  over  spectral  techniques  when  considering 


nonlinear  partial  differential  equations  since  spectral  Methods  can  be  very 


computationally  expensive  in  the  evaluation  of  nonlinear  partial  differen¬ 


tial  equations. 


In  order  to  demonstrate  the  spectral  method  consider  the  one  dimen¬ 


sional  transient  equation: 


3u  3  u 


at  ax2 


with  the  boundary  and  initial  conditions 


u(  0 ,  t )  »  u(if.t)-0 


u(x.O)  =  f(x) 


the  analytic  solution  to  this  problem  can  be  shown  to  be 


u(x. t)  «  I  {  |  (x)sin(nx)dx  }  sin(nx)exp( -n2t ) 


Therefore.  let  u„  be  the  spectral  approximation  to  u,  so  that  the  solution 

ft 


can  be  approximated  as 


u  (x.t)  »  £  a  ( t)sin(nx) 

n  n 

n  - 1 


Substituting  back  into  equation  (12)  results  in 


da  ( t ) 
n 


n  an(t) 


and  this  set  of  ordinary  differential  equations  are  solved  with  respect  to 


r” 

the  initial  conditions  a  (0)  »  Z/n  f ( x )s in ( nx )dx  ( n= 1 . N) .  Gottlieb 

n  „■> 


and  Orszag  [  1977]  have  shown  for  this  example  that  u(x , L ) -u  ( x  ,  t )  goes  to 


zero  more  rapidly  than  exp(  N  t)  for  any  t>0  and  N-->®.  It  can  be  seen  that 


the  spectral  approximation  of  u(x.t)  that  results  is  a  truncation  of  the 


exact  solution  to  N  terms.  In  contrast  to  this  exceedingly  good  approxima¬ 


tion  it  is  possible  to  construct  a  spectral  method  that  will  arrive  at 


extremely  poor  results;  therefore  care  must  be  exercised  in  the  construction 


of  a  spectral  approximation 
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The  pseudospectral  Method  is  typically  chosen  over  the  spectral  Methods 


when  considering  a  nonlinear  equation.  For  exaaple  consider 


3u  .  ,3u  3  u 

—  -  exp( xu  —  +  — - 
3t  3x  .  2 

3x 


(17) 


let  the  approximation  u^fx.t)  to  u(x,t)  be 


u  (x.t)  ■  Z  an(t)*n(x) 

n=l 


(18) 


where  ^(x)  is  an  orthonormal  function.  Then  the  spectral  approximation 


will  be 


- Tt -  ’  [  ♦_{eXP[x£aI>_ ]£a_+'  '  d*  (19) 

at  j  me  n  n  n  n  n  ni 

It  is  seen  that  these  equations  for  a^ ( t )  are  computationally  coaplex  due  to 

the  resulting  integro-dif ferential  equation  for  a  (t).  Therefore,  consider 

n 

the  pseudospectral  method.  First.  N  collocation  points  (x, ,x« . . . ,x„)  lying 

12  N 

within  the  computational  domain  are  introduced.  The  approximation  (18)  is 
forced  to  satisfy  the  governing  partial  differential  equation  (17).  For 
example,  the  following  steps  would  be  followed;  1)  Determine  N  coefficients 
a  (t)  such  that 


U\’( x j  •  0)  =  E  an(0,',n<Xj  !  (20) 

2)  Evaluate  each  term  of  the  governing  partial  differential  equation  in 

either  physical  or  spectral  space,  whichever  gives  the  most  accurate  and 

easily  obtainable  approximation.  For  example,  exp  (x  ,u.,( x  . . t ) )  is  evaluated 

J  N  j 

in  physical  space  since  the  value  for  u^tXj.t)  Is  known  and  the  partial 

derivatives  are  evaluated  in  spectral  space  since  this  results  in  the  most 

accurate  representation.  3)  Integrate  in  time  with  respect  to  u„(x.,t) 

N  J 

using  the  "leap-frog”  method  or  another  suitable  choice.  4)  Repeat  steps 
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1 ) -3 )  until  the  tiae  integration  is  completed .  Froa  this  example  pseudo- 
spectral  methods  are  seen  to  be  much  easi  r  to  apply  to  nonlinear  equations 
than  corresponding  spectral  techniques. 


The  application  of  boundary  conditions  in  a  spectral  method  can  deter¬ 
mine  the  solution's  stability.  Gottlieb  et  al.  [1981]  state  that  incorrect 
boundary  treatments  nay  give  strong  instabilities  in  contrast  to  finite- 
difference  methods  in  which  this  would  appear  as  relatively  weak 
oscillations.  Moin  and  Kim  [1980]  note  that  fully  explicit  pseudospectral 
solution  of  the  incompressible  Navier-Stokes  equation  have  an  inherent 
numerical  problem  for  viscous  flows  involving  solid  boundaries,  due  to 
enforcing  no-slip  conditions  at  the  walls.  Rudy  and  Stridwerda  [1981] 
presented  a  study  of  inflow  and  outflow  boundary  conditions  for  compressible 
Navier-Stokes  equations  of  flow  past  a  flat  plate.  This  study,  conducted 
for  finite-difference  methods  of  solution,  indicates  that  errors  in  the  data 
specified  at  the  inflow  boundary  condition  can  significantly  affect  the 
solution  obtained.  Gottlieb  and  Orszag  [1977]  note  spectral  methods  are 
extremely  sensitive  to  the  formulation  of  boundary  conditions,  for  example, 
when  improper  boundary  conditions  are  imposed,  the  solution  is  likely  to  be 
"explosively"  unstable. 

Convergence  of  the  spectral  (Galerkin)  method  has  been  demonstrated  for 
a  Fourier  representation  with  periodic  boundary  conditions  by  Hald  [1981]. 
Maday  and  Quarteroni  [1982]  have  provided  stability  results  and  "optimal" 
convergence  rates  for  Galerkin  and  pseudospectral  approximations  (using 
trigonometric  polynomials)  for  the  stationary  Navier-Stokes  equation  with 
periodic  boundary  conditions.  Canuto  [1984]  analyzed  explicit  and  Implicit 
methods  of  imposing  boundary  conditions  for  Chebyshev  and  Legendre  ap¬ 
proximations  of  elliptic  problems  ensuring  stability  and  convergence  for 
these  methods.  Canuto  and  Quarteroni  [1984]  give  stability  and  "optimal" 


a 
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convergence  rates  for  Chebyshev  collocation  approximations  of  variable 
coefficient  elliptic  problems  with  Diricblet  or  Neumann-type  boundary 


conditions.  Pasciak  [1980]  investigated  spectral  and  pseudospectra 1  repre¬ 


sentations  of  advection  equations  with  the  intention  of  introducing  a 


framework  in  which  finite  elements  analysis  can  be  applied  to  spectral 


methods.  In  addition  error  estimates  are  given  for  fully  discrete  explicit 


pseudospectra  1  as  well  as  semidiscrete  spectral  and  pseudospectra  1  methods. 


Some  additional  considerations  are  necessary.  In  the  case  of  a  discon¬ 


tinuity,  the  rate  of  convergence  in  the  region  of  the  discontinuity  is 


seriously  degraded,  but  spectral  approximations  are  still  normally  more 


accurate  than  corresponding  finite  difference  representations  [10]. 


Additionally,  the  error  is  localized  better  by  the  spectral  method  such  that 


less  local  dissipation  is  required  to  smooth  the  discontinuities.  If  dis¬ 


sipation  or  a  filtering  technique  is  not  used  Gibb's  phenomena  is  seen  in 


the  region  of  the  discontinuity,  and,  the  resulting  error  from  the  lack  of 


smoothing  pollutes  the  solution  globally  [40].  Najda  et  a]..  [1978]  have 


shown  for  general  linear  hyperbolic  Cauchy  problems  with  nonsmooth  initial 


data  that  the  appropriate  smoothing  techniques  applied  to  the  equation 


results  in  stability  and  that  this  smoothing  combined  with  smoothing  of  the 


initial  data  gives  rise  to  infinite  order  accuracy  away  from  the  discon¬ 


tinuities  of  the  exact  solution.  The  most  prominent  examples  of 


discontinuities  that  have  been  examined  by  spectral  methods  are  treatments 


of  shj>ck  waves  [12,13.18,33,45,46,50,55].  A  variety  of  filters  and  dissipa¬ 


tion  functions  have  been  used  to  damp  the  oscillations  occurring  in  the 


solution  due  to  the  discontinuity.  For  example,  one  sided  Schumann  filter 


[12,33],  von  Hann  window  filter  [18,46],  second  and  fourth-order  artifi¬ 


cial  viscosity  [45,50],  artificial  density  [50]  as  well  as  the  method  of 
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Boris  and  Book  [1976],  orginally  developed  for  the  construction  of  finite 
difference  algorithms  involving  strong  shocks  [55] ,  have  been  able  to 
produce  an  accurate  smooth  solution  for  this  type  of  problem.  In  addition, 
Gottlieb  et  a_l.  [1981]  used  a  low-pass  spectral  filter  to  remove  the  high 
frequency  waves  that  lead  to  instability  and  a  "cosmetic"  filter  (a  one¬ 
sided  Schumann  filter)  to  find  a  nonosci 1 latory  numerical  solution. 

The  spectral  and  pseudospectral  methods  have  been  used  successfully  to 
model  wakes  [33],  internally  separated  flows  [22],  flow  past  flat  plates 
[36.53.54]  and  transonic  flows  past  airfoils  [13,50].  The  areas  of  concern 
to  the  present  work  are:  representation  of  two  dimensional  flow  past  a 
pitched  plate,  problems  encountered  due  to  imposition  of  boundary  condi¬ 
tions,  and  separation  that  is  certain  to  occur  [27], 

Both  Plotkin  [i982]  and  Kumar  and  Yajnik  [1980]  considered  separated 
flow  based  on  the  stream  function  equation 

H  -  H  =  Re  ( 21 ) 
y  yyx  x  yyy  yyyy 

One  of  the  problems  that  Kumar  and  Yajnik  note  about  this  problem  is  the 
presence  of  reverse  flow--the  equation  is  said  to  be  of  mixed-parabolic 
type.  The  theory  of  such  equations  is  not  sufficiently  developed  to  indi¬ 
cate  boundary  conditions  that  permit  solution.  Furthermore,  the  steady-state 
equation  considered  by  both  Plotkin  and  Kumar  and  Yajnik  must  be  replaced  by 
a  more  general  representation: 

'  \h)v*  ‘  **  '***  (22) 

This  stream  function  equation  was  used  by  Mei  and  Plotkin  [1984]  in  deter¬ 
mining  confined  laminar  wakes. 

Symmetric  flow  past  a  flat  plate  has  been  treated  by  Orszag  [1971]  and 
Taylor  and  Murdock  [ 1980] ,[ 1981 ] .  Planar  flow  has  been  investigated  by  Moln 
and  Kim  [1980],  Orszag  and  Kells  [1980]  and  Kleiser  [1982],  Taylor  and 
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Murdock  studied  the  flow  over  a  flat  plate  in  a  range  of  1.2x10  <Re<3.8xlO  , 


which  is  well  within  the  turbulent  flow  regime.  The  velocity  profile  was 
solved  as  perturbation  about  the  Blasius  velocity  profile.  Taylor  and 
Murdock  used  a  mesh  of  17x17  to  solve  for  the  velocity  profile,  while  Orszag 
used  nine  collocation  points  to  approximate  a  one  dimensional  boundary 
layer,  both  studies  resulted  in  accurate  approximations. 

The  treatments  of  transonic  flow  by  Gottlieb  et  a_l.  (1984b]  and  Streett 
et  al.  [1985]  are  interesting  in  that  spectral  methods  (Chebyshev 
collocation)  are  being  used.  The  treatment  of  transonic  flow  over  an  air¬ 
foil  can  be  viewed  as  state-of-the-art  in  the  use  of  spectral  methods 
because  of  the  difficulty  posed  by  the  sharp  shock  gradients  and  the  com¬ 
putational  competition  with  finite  difference  methods.  Again,  it  is  seen 
that  separation  causes  difficulty  as  Streett  et  aK  note  that  the  potential 
equation  which  is  being  solved  becomes  a  mixed  elliptic-hyperbolic  type 
and  admits  weak  solutions  with  discontinuities.  Streett  et  al.  use  ar¬ 
tificial  viscosity  with  a  directional  bias  introduced  in  the  potential 
equation  in  the  supersonic  region  to  suppress  the  appearance  of  compression 
and  expansion  shocks  due  to  the  presence  of  a  supersonic  bubble.  It  is 
apparent  that  the  use  of  multigrid  techniques  has  made  spectral  methods  for 
steady  compressible  flow  competitive  with  finite  difference  methods  for 
problems  of  aerodynamic  interest. 

SOME  ILLUSTRATIVE  NUMERICAL  EXAMPLES 

Successful  application  of  spectral  method  is  still  something  of  an  art- 
-experience  in  the  selection  of  appropriate  series  expansions  is  a  virtual 
necessity.  To  Illustrate  this  point  and  the  method  in  general,  a  number  of 
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analytic  solution  for  this  problea  is 


„  ®  J  (a  £ )  -a  r 

, ,  ,.2,  „  _  o  ns  n 

4>  =  1-?  )  -  8  r  — - -  e 


(27) 


n=l  a  J  (a) 
n  1  n 


The  pseudospectral  approximation,  ,  to  the  solution.  $>,  was  represented  by 

n 

a  Chebyshev  polymonial  expansion  with  the  coefficients  being  determined  at 
each  time  step.  Nine  terms  were  included  in  the  series  and  a  time  increment 
of  0.001  was  used  for  integration  of  equation  (26)  with  an  Euler  predictor 

*2 

♦  <V*)  -  ♦(t,.?)  =  j  (4*1  ff(?|£»dt 


(28) 


Table  1  illustrates  the  results  obtained  for  this  problem  integrated  with 
T=0 . 05 .  It  should  be  noted  that  a  fairly  accurate  solution  was  obtained 
even  though  few  terms  were  used  in  the  series  approximation  of  the  solution. 
Though  this  problea  may  be  more  demanding  than  Stokes  first  problea  due  to 
the  presence  of  a  varible  coefficient  it  also  cannot  be  regarded  as  a 
demanding  test. 

The  classical  Gratez  thermal  entrance  length  problem  was  selected  as 
the  final  examp le--pr imar i ly  because  the  exact  solution  is  known.  However, 
this  is  a  more  strenuous  test  of  the  method  because  of  the  initial  discon¬ 
tinuity  (producing  an  infinite  fiusselt  number).  The  governing  equation 
after  insertion  of  the  parabolic  velocity  distribution  is 

RePrf  1  -r*  —  (r.  — )  (29) 
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The  difficulty  arising  at  the  wall  where  r*R  is  apparent  It  was  also 
thought  likely  that  the  F.uler  predictor  used  previously  would  prove  inade¬ 
quate,  so  the  fourth-order  Adaas-Bashforth  Method  was  used  in  its  place, 
although  the  Euler  expression  was  used  to  get  started.  Some  oscillatory 
behavior  was  detected  originally  in  the  approxiaate  solution  and  this  was 
dealt  with  by  incorporation  of  Halted  digital  filtering  The  predi.  tor 
foraulation  is  again 


•  (  r* .  l  )  6(  r*  .  /.  ,  ; 

C  i 


i  a  .  •  ae  .  ,  « 
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Figure  2  illustrates  the  results  obtained  using  a  d  iaens  ion  less  axial  (z  ) 
increaent  of  0.003;  the  abcissa  is  diaensionless  axial  distance  and  the 
ordinate  is  diaensionless  lean  temperature  The  approxiaate  solution  is 
qualitatively  good.  but  quantitatively  disappointing  Clearly  a  reduced 
step-size  would  be  necessary  in  order  to  produce  an  acceptable 
approxiaation 


EXTERNAL  SEPARATED  FLOWS 

Consider  the  two  dimensional  i ncoapress i b 1 c  Navier  Stokes  equation  for 

flow  past  a  pitched  flat  plate  expressed  in  terms  of  the  stream  function 

3  3  3  2 

•  (♦  —  *  —  )7t(r  ♦  (31) 

3t  y  3x  x  3y 

The  transient  response  of  the  flow  to  a  periodic  forcing  function  is  the 
ultimate  goal,  but  the  first  step  is  to  consider  the  steady  state  solution. 
A  Fourier  spectral  solution  for  the  steady  state  fora  of  equation  (31)  was 
presented  by  Mel  and  Rlotkin  [1984]  for  confined  laminar  wakes  The  use  of 
the  Fourier  spectral  aethod  by  Me i  and  Plotkin  was  made  possible  due  to 


periodic  boundary  conditions.  In  the  present  study  a  pseudospectra  1  ap¬ 
prox  iut  Ion  Mill  be  used  based  on  orthogonal  Chebyshev  or  Legendre 
polynomials.  Relating  the  collocation  points  to  the  structure  of  Chebyshev 
or  Legendre  polynomials  results  in  good  approximations.  It  should  be  noted 
that  it  is  possible  to  use  equally-spaced  Chebyshev  collocation,  but  as  the 
number  of  data  points  increase  beyond  10  Chebyshev  interpolation  rapidly 
decreases  in  accuracy  [52)  This  decrease  in  accuracy  is  not  a  problem  Mhen 
considering  a  Legendre  expansion 

The  problem  Mith  equally  spaced  points  for  the  Chebyshev  collocation 
can  be  avoided  if  interpolation  points  on  the  interval  (-1,1)  are  chosen  to 


be 


X  -  cosl^l  ;  (  J  -  0 .  1  .  .  N )  (  32 ) 

J  N 

for  a  Nth  order  Chebyshev  polynomial  approximation  A  Chebyshev  polynomial 
of  degree  n  is  defined  as 

T  (x)  »  cos(n  arccos(xl)  (33) 

n 

i f  foil oms  t hat 

T  (  x  )  cos(^)  .  (  j  -0.  1  .  .  N) 

The  ('hobyshe  '  polynomials  lend  themselves  to  the  use  of  the  Pourier  trans 
form  to  determine  interpolation  coefficients  The  Legendre  polynomials  do 
not  (end  themselves  to  the  Fourier  transform,  but.  Taylor  of  a^  )1984)  have 
shown  that  in  general  the  fast  Fourier  transform  and  (.rout  reduction  with 
partial  pivoting  require  approximately  the  same  amount  of  computational  time 
if  the  defining  matrix  for  the  Crout  reduction  is  not  changed  Therefore  it 
should  be  possible  to  use  either  Chebyshev  polynomials  with  a  fast  Pourier 
transform  or  Legendre  polynomials  with  Crout  reduction  and  partial  pivoting 
The  question  then  arises  which  of  these  polynomial  approximation*  would 
be  most  appropriate  under  the  conditions  being  considered  The  Chebyshev 
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polynomials  have  the  advantage  of  concentrating  the  collocation  points  in 


the  regions  of  x*  1  and  x-l.  While  the  Legendre  can  be  defined  at  any  point 
in  the  system,  but  are  typically  equally  spaced  Pseudospectra)  Chebyahev 
methods  are  commonly  seen  used  in  the  literature  this  is  in  part  due  to  the 
availability  of  fast  Fourier  transforms  (FFT's)  and  a  general  belief  that 
direct  matrix  inversion  is  not  as  fast  as  the  FFT  It  was  decided  to  use 
Chebyshev  polynomials  on  the  basis  of  the  availability  of  the  FFT  The  use 
of  Chebyshev  collocation  will  ensure  that  a  large  number  of  Interpolation 
points  are  near  'he  plate  in  the  region  of  the  greatest  gradient.  Finlayaon 
[1980)  notes  that  collocation  may  not  be  satisfactory  when  the  solution 
domain  contains  steep  gradients.  which  is  the  situation  that  is  expected 
with  thin  shear  layers 

The  Falkner  Skan  equation  was  used  as  a  too)  to  estimate  the  accuracy 
of  the  pseudospec t ra  l  approximation  for  separated  flow  present  on  the  back 
side  of  an  iru  lined  plate  Based  on  a  fourth  order  Runge-Kutta  solution  of 
the  Falkner  Skan  equation  ! 6  0  125) 

f  ' ’  •  fr  01  1  f  2)  0  (35) 

with  boundary  nrndit  inns 

r  :  o  c. 

■  .  q  «  (  36 ) 

a  chebyshev  i  r .  * er p«i .  a  f  i on  function  was  evaluated  for  N  10, 20  and  40  The 
evaluation  was  tiased  on  a  comparison  of  the  first  and  second  derivatives 
found  using  a  pseudospec t ra 1  evaluation  and  those  obtained  by  the  Runge- 
Kutta  method  The  coefficients  for  the  pseudospect ra 1  approximation  are 
obtained  by  a  Fourier  transform  Three  separate  observations  were  made  from 
these  evaluations.  1)  In  one  trial  the  data  used  for  the  value  of  f(p)  at 
each  collocation  point  was  rounded  to  three  significant  figures  with  N«20 
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This  resulted  in  large  oscillations  of  the  first  derivative  as  suggested  by 
Osher  (1984 1  and  Majda  et  a_l  (1978)  2)  Increasing  the  nuaber  of  colloca¬ 
tion  points  froa  10  to  20  to  40  did  not  significantly  affect  the  accuracy  of 
the  resulting  approx laat l ons  3)  The  accuracy  of  a  derivative  decreased 
approx iaate ly  one  order  of  Magnitude  for  each  increase  in  the  order  of 
d i f f erentat ion  A  compilation  of  these  results  Is  presented  in  Tables  2  and 
3 


Based  upon 

the  above 

\  t 

was  dec i ded  t  o 

use  a  steady 

state  strea* 

function  vorticity  represent 

.3 1  ion 

for  'he  flow 

3u  3* 

3u  3* 

r’u 

3\j  t 

(  37  ) 

3x  3y 

3y  3x 

3«  J 

ay" 

1 

,  €l  -Li 
'  >  >  ■ 

(  38) 

3x  "  3y 

with  the  boundary 

cond  i  ’  .  ci  s 

*(x  01 

*1X0! 

X 

*  'x 
» 

0)  11  i  *.  x 

<  a 

1  39) 

♦lx. tal 

*( t®  y  i 

♦ft 

e  e  s  t  :  **  a  a 

(40) 

ol J® . y  ) 

U( X  1 

) 

(41  ) 

u  1  x  ,  0  ) 

1  s  X 

s  a 

1  42  ) 

*V_ 

: hen  t  he  < t reaa  f ' 

jni  t  >n  mil 

w  o  r  f 

'  i  i  t  y  an  tie  appn 

ix  isatril  hy 

N 

* '  x  >  : 

i  i 

n  0 

ri  7 

■’ 

N 

Jit  y  1 

Z  a  f  x 

n  !) 

>  r  r  y 

1 

(43) 

This  representation  was 

h « >  s  tf  n 

t.i  sake  use  of 

the  increased 

accurst y  of 

pseudospet t ra 1  approx i aa t i ons  along  the  axis  in  which  the  greatest  aaount  of 
change  will  m  cur  f.nttlieb  iM  a_i  Il984a)  note  that  a  finite  difference 
representation  is  typn  ai !y  used  along  the  vertical  axis  and  a  pseudo 
spectral  representation  along  the  horizontal  axis  The  solution  is  split 
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wv/vC'vW  -v- ;  •  ■ 

■e  v  V.V.  A.  C.  z.V;.  .V.C.A'.-.  C.  -  .  -..  V\ 


-.‘A/ 


s  i  t;ii  if  1 1  .1  ii  i  I  i  K>ires 


into  an  upper  and  lower  region  for  above  and  below  the  plate  and  having  the 
numerical  boundary  conditions 


<ju(x,0)=o1(x.0)  a<x<-a 

*U(x,0)  -  ♦i(x,0)  a  <  x  <  -a  (44) 

where  the  superscripts  u  and  l  refer  to  he  upper  and  lower  regions 
respectively . 

The  following  computational  scheme  was  then  used  to  evaluate  the  flow. 


*U(x,0)  -  ♦Nx.O) 


The 

•esh 

nodes 

for 

the  stream 

function  were  initialize  using  an  equation 

given 

in 

Lamb 

[  1945 

]  that  has 

been  corrected  for  the 

angle 

of  attack  and 

transformed 

to 

Cartesian  coordinates  (Appendix  A). 

The 

vorticity  was 

initial ized 

as 

zero 

everywhere 

except  on  the  plate 

where 

a  first,  order 

finite  difference  evaluation  was  performed  based  on  methods  found  in  Roache 
[1972] 


2(*  *  ) 

cj(x.O)  =  - — ~ — —  *  0(An ) 

An 


where  An  is  the  distance  from  the  wall  (w)  to  the  mesh  node  normal  to  the 
wall  (w-l).  The  following  steps  were  then  followed  in  obtaining  a  solution: 

1)  Determine  the  pseudospectra  1  coefficients  to  the  Chebyshev  polynomials 


at  each  (x.y^)  combination 


2)  Starting  at  the  leading  edge  of  the  flow  field  evaluate  the  derivatives 
with  respect  to  y  for  that  column. 

3)  Equation  (37)  is  solved  with  respect  to  u  for  a  finite  difference 

representation  of  the  x  derivative. 

4)  Equation  (38)  is  solved  with  respect  to  \Jr  for  a  finite  difference 

representation  of  the  x  derivative. 

5)  Steps  3)  and  4)  are  repeated  for  each  value  of  u  and  ♦  in  the  column. 

6)  Move  to  the  next  column  and  repeat  steps  2)  through  5). 

7)  Repeat  for  the  second  region. 
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8)  Satisfy  the  numerical  boundary  conditions. 

9)  Continue  steps  1)  through  8)  until  convergence  Is  achieved. 

In  order  to  estimate  the  accuracy  of  the  above  algorithm  a  central  finite 
difference  algoritha  for  the  stream  function  representation  (22)  was 
developed.  The  successive  under  relaxation  algoritha  was  based  on  the  saae 
boundary  conditions  as  given  by  equations  (39)- (40). 

Both  the  finite  difference  and  pseudospectral  algorithas  were  ex¬ 
plosively  unstable.  The  fact  that  both  algorithms  were  unstable  suggests 
that  improper  boundary  conditions  are  being  applied. 
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Appendix  A 


La*b  [19451  gives  the  following  representation  for  the  stream  function 


for  flow  past  a  flat  plate  pitched  at  angle  of  45* 


-  sinh£(cosrj  -  sinq) 

✓2 


whose  edges  are  located  at  x  =  ♦  c  and  where  q#  is  the  free  stream  velocity. 


This  equation  was  derived  from  the  relation  describing  fluid  motion  relative 


to  an  elliptic  cylinder 


^  -  ■  c  |  v  sinh^cosq  -  u  sinh£sin£^ 


where  u  and  v  are  the  x  and  y  components  of  velocity  with  respect  to  the 


plate.  Then  +  can  be  represented  as 


+  -  -c  q4cos0sinh£-|tan0cosq-sinq}’ 


where  0  is  the  angle  of  attack  for  the  plate.  Cartesian  coordinates  and 


elliptic  coordinates  are  related  in  the  following  fashion 


x  =  ccoshff )cos(q) 


y  =  cs  inh  (£  )  s  in  ( 17 ) 


The  fol  jwing  relation 


2  2  2.2 
c  cos  17  c  sin  rj 


along  with  the  definition  of  a  point  on  a  hyperbola  and  the  relation  of  sinh 


to  cosh  define  the  following  relations  for  the  stream  function  in  Cartesian 


coordinates 


i0cose| 


tan0V  x 


j^(\/(c^x)2-y2'  -\/ ( c-x )  2  +  y2  '  )2  -y  }  (A7) 


for  x>0,  and 


♦  q.cos^|  tan0Y  x2  -  v(c-‘-x)2--y2  a/ (c-x)2+y2'  )2  -y  j-  (A8) 


for  x<0. 
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Pinal  report  on  subcontract  84  RIP  27  by 
H.P.  Hameka,  Department  of  Chemistry, 
University  of  Pennsylvania 


During  a  stay  at  the  Prank  J.  Seiler  Research  Laboratory  in  the  summer 
of  1984  I  completed  a  calculation  of  BSR  coupling  constants  for  a  series  of 
small  organic  radicals,  namely  methyl,  allyl,  ethyl  and  vinyl.  My  research 
efforts  supported  by  subconstract  84  RIP  27  involved  the  extension  of  these 
calculations  to  larger  systems,  varying  from  the  phenyl  radical  to  mono-,  di- 
and  tri-nitro  phenyl  and  benzyl  radicals. 


During  the  past  year  we  have  accumulated  an  extensive  amount  of 
theoretical  data  on  the  radicals  mentioned  above,  varying  from  phenyl  to 
trinitro- benzyl.  Unfortunately  we  found  that  the  procedure  that  gave  us 
satisfactory  theoretical  results  for  the  smaller  radicals  did  not  lead  to  good 
agreement  with  the  experimental  data  for  the  larger  radicals. 


In  order  to  improve  the  accuracy  of  our  calculations  we  first  developed  a 
method  for  removing  higher-order  spin  contaminations  from  the  UHP  results. 
This  led  to  some  improvements  but  we  did  not  judge  these  improvements  as 
sufficient.  We  concluded  that  the  discrepancies  are  due  to  the  small 
non-orthorgonality  between  the  unpaired  orbital  and  the  orbitals  of  the  other 
spins.  We  are  now  engaged  in  calculations  where  these  non-orthogonality 
effects  are  determined  so  that  they  can  be  eliminated. 


We  hope  that  the  latter  calculations  will  lead  to  improved  agreement 
between  theory  and  experiment  so  that  we  can  feel  confident  about  publishing 
our  results.  However,  we  have  not  yet  reached  that  stage. 


We  plan  to  continue  work  on  this  problem  and  we  hope  to  obtain 
itisfactory  results  within  the  next  year. 
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cited  in  modulation 


Based  or.  evidence  fro:.  anatomical*  physiological,  ana 
biochemical  studies  serotonergic  efferents  of  the  Cram  stem 
raphe  nuclei  contribute  to  the  mossy  fiter  system,  innervation 
of  the  cerebellar  glomeruli.  The  anatomical  mapping  includes 
fluorescent  histochemistry  (4,13)  and  autoradiography 
following  intracisternal  infection  of  ^0 -serotonin  (7).  In 
noth  cases  iaceliny  was  identified  within  structures  resem¬ 
bling  the  large  mossy  fiber  rosette  terminal  (25).  Additional 
orthograde  transport  studies  (6,8,12)  ,use  of  retrooradely 
transported  horseradish  peroxidase  (8,21)  and 
immunocy tochemistry  (5)  have  verified  the  existance  of  5-HT 
fibers  within  the  cerebellum,  however,  the  innervation  is 
complex.  Char. -  Palay  (8)  describes  three  distinct  systems: 
messy  fibers,  fine  axons  that  ascend  to  the  molecular  layer 
and  bifurcate  in  manner  resembling  parallel  fibers,  and  final¬ 
ly,  a  diffuse  axonal  system  that  innervates  both  the  deep 
cereceilar  nuclei  and  the  cerebellar  cortex. 

Fhysiolgical  studies  to  determine  the  functional  signi¬ 
ficance  cf  these  serotonergic  fibers  are  scarce  ar.d  con¬ 
centrate  cr.  ?  u  r  «  i  n  y  e  cell  responses  to  raphe  stimulation  cr 
iontophoresis  cf  serotonergic  agents  (7,21-24).  However,  they 
dc  demonstrate  that  serotonergic  mechanisms  probably  play  a 
cole  m  modulating  cerebellar  cortical  activity.  Obviously,  a 
more  thorough  investigation  of  serotonergic  transmission  in 
the  granular  layer  is  needed. 

The  results  of  recent  uptake  studies  utilizing  an 


isolated  glomerular  preparation  rave  ^hcwn  that  a  high  all  i  r.  1  - 


ty  uptake  system  for  ierotor.ir.  :oe:  exist  in  this  ret  un  (26). 
These  studies  are  part  of  an  ongoing  project  to  identify 
cerebellar  glomeruli  neurotransm  itter  systems  a  no  their 
interactions  with  cne  another.  The  positive  results  of  these 
exper  irr.ents  have  provided  a  solid  base  on  which  to  segm  an 
investigation  of  the  physiological  responses  of  cerebellar 
granule  cells  to  serotonergic  stimulation. 

II.  OBJECTIVES 

The  primary  objective  of  this  research  initation 
project  was  to  determine  the  response  of  granule  cells  to  raphe 
stimulation.  Since  the  dorsal  raphe  is  such  a  well  defined 
cluster  of  serotonergic  cells  in  the  rat  we  elected  to  begin 
with  this  particular  nucleus.  It  is  also  one  of  four  raphe 
nuclei  that  anatomical  studies  have  shown  to  project  to  the 
cerebellar  cortex.  An  initial  sampling  of  recording  electrode 
placements  in  the  lateral  hemisphere  foli  was  planned  to 
determine  whether  or  r.ot  specific  regions  were  more  likely  to 
contain  responsive  ce  .Is.  To  strengthen  the  proposal  that 
responses  were  indeed  mediated  via  activation  of  serotonergic 
synapses  a  second  group  of  experiments  was  planned  in  which 
recordings  made  with  multitarrei  electrodes  would  enable  the 
icntcphoretic  application  of  serotonergic  receptor  antagonists 
during  stimulation  evoked  responses.  These  experiments  would 
aid  in  u  e-  ter  mi  in  in  c  the  functional  role  of  serotonin  in 
information  processing  at  the  level  of  the  cerebellar 
glomerular  synapse. 


p  r  ^  ^  ’  L  7  i  I  ?  (,  *  S  ^  TC  1  _  7  ;  A  L  r  API ~L  £  1  1 .".  L  A  T  I C  V 
."he  of  ex^e:  ::  i-r.ti  exa:  ir:r,;  ,eu:orir.': 

influence  on  cerebellar  activity  have  a eai  t  with  rurk  ir.je  or 
:>.ccorticrl  ce:i  res  per.  s  e  s  tc  raphe  striruiat.&r.  L'tiiizrn- 
extracellular  recording  techr.u.ies,  Strah-endorf  et  a  1  (22) 
have  reported  that  stimulation  or  the  raphe  centra-  is  superior 
cr  inferior  produces  initial  bursting  of  fastigia!  and  Purkir- 
je  cells  followed  oy  reduced  spontaneous  activity  lasting  up 
to  1600  nsec.  When  stimulation  of  the  sensorinotor  cortex  or 
radial  nerve  was  applied  during  this  period  of  raphe 
conditioning  evoked  spike  activity  was  suppressed  to  an  even 
greater  extent  than  spontaneous  activity*  leading  to  the  sug¬ 
gestion  that  serotonin  modulates  the  ratio  of  spontaneous 
activity  (noise)  to  evoked  activity  (specific  responses  to 
afferent  signals)  (24).  Since  very  little  information  is  known 
about  the  possible  role  of  serotonin  in  the  modulation  of 
granule  cell  activity  our  initial  experments  were  planned  to 
simply  investigate  the  direct  affect  of  raphe  stimulation  on 
granule  cells. 

NETHCDS 

Adult  Spr ague-Dawley  rats  from  Holztrran  suppliers  were  us^d. 
Animals  were  anesthetized  with  urethane  (1.5  mg /kg  body 
weight)  injected  intr aper  itoneci-y  and  supplemented  as  needeo. 
fectal  temperature  was  continuously  r.onitcreo  and  body 
temperature  maintained  at  3  7-0.5  C  by  r.euns  ct  a  heating  pad 
equipped  with  a  negative  feedback  circuit.  After  placement  in 
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*  6  -ver i>  m,  u_ij  rat'er  2  1%  c  £  acit  ;r. 

cal  -aline  was  p.acto  un  tr.e  ctit;^ai  sactace  to  {.revert 
...  r  ^  .  r.  c  and  reduce  a  -  :t:ce  r.  c  is  e .  Ar  adaitiona*  ho  .  e  «as  rede 
.  r.  the  t  <  u  1  *  t^r  j031tiun.ru  of  the  stimulating  electr.de, 
ccorcinates:  A  -6.5,  L  ♦  1 . C ,  V  6. 5-7.0,  into  the  oorsal  raphe 
(14).  Extrace.l_.ar  recordings  were  cade  with  glass  capil.ary 
electrodes  c  r  a  w  r.  and  Dicker,  to  a  tip  d  laneter  of  5-10  it  (1  to 
5  Megohm  impedances),  tilled  with  3  K  NaCl  saturated  with  fast 
green  for  later  verification  of  electrode  tip  placement.  Unit 
activity  and  field  potentials  were  amplified  by  a  high  input 
upedar.ee  preamplifier  and  audio  amplifier,  displayed  on  a 
TeKtror.ix  storage  csciiicscope  for  photography,  and  then  fed 
into  a  window  discriminator  (20  for  signal  sorting.  Cats  was 
stored  cn  r acre  tic  tape  for  further  analysis  or  relayed  to  a 
chart  recorder  for  on  line  observations.  The  recording  elec¬ 
trode  nicrscr.ves  were  tilted  to  fascilitate  electrode 
penetration  into  the  crew ns  cf  the  cerebel.ar  folia.  Concen¬ 
tric  Dipo.ar  stimulating  electrode 3  (Fhodes  Medical  Ir.stru- 
nets,  Inc.)  were  usee  to  apply  single  rectangular  pulses',  6C 
Kz) ,  C.5  nsec  in  duration  and  ranging  from  C-5C0  nA  intensity, 

using  a  V. PI  Frog r an  r .able  stimulator. 

PEFILCf 

7  he  response  to  oorsal  raphe  stimulation  was  not  as 
rooust  as  we  had  anticipated.  Cut  of  the  87  cells  sampled  in 
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the  ,::r.uic  I  :',e:  ^.niy  11  res;.cri.ec  ccr.s  is  tar.  tly  to  stimuia- 
t::r.  t  . ::  ot  tr.eie  cello  displayed  cecreased  sp  ontar.eous  acti¬ 
vity,  three  were  e:.  cited  b  y  the  .  ti:  jloticn  and  four  cells 
d ispiayec  a  b ipr.as.c  response  c£  initial  excitation  followed 
o y  a  long  period  cf  suppressed  activity.  The  location  of  these 
ce.ls  in  the  ir.  terrediate  to  far  lateral  anterior  lateral 
rerupr.ere  corresponced  to  areas  expected  to  have  significant 
innervation  by  serotonergic  fibers  (5)  although  they  were  not 
concentrated  in  any  one  folia  or  defined  region. 

Figure  1  illustrates  the  response  of  a  cell  whose  spon¬ 
taneous  activity  was  suppressed  by  raphe  stimulation.  The  high 
frequency,  low  amplitude  action  potentials  of  this  cell  found 
at  a  depth  of  56C  urn  below  the  surface  suggest  that  it  is 
indeed  a  granule  cell(S).  Kith  increasing  stimulus  intensities 
the  degree  cf  supression  increases  to  a  maximum  duration  of 
2  2 C  r  sec. 


Fig.  1.  Response  of  granule  cell  to  single  pulse  stimula¬ 
tion  of  the  dorsal  raphe.  Each  trace  formed  ty  three  beam, 
sweeps.  Stimulus  indicated  by  artifact  to  the  left  cf  each 
truce.  From  top  to  oottorr.  traces  indicate:  control  baseline, 
2  C  ,  2C,  and  5CuA  stimulus  intensity.  Scale  markers  denote 
iCCmsec  anc  lrrv. 


Fig  2.  Example  of  granule  cell  responding  to  dorsal  raph 
stimulation  with  initial  bursting  activity  followed  by  a  Ion 
period  of  suppressed  activity.  Top  and  bottom  traces  are  contro 
baseline  sweeps.  Second  and  third  middle  traces  oisp^lay  respons 
to  IC  ar.a  30  uA  sun  ulus  intensity.  Scale  markers  denote  50  mse 
ano  lmV. 


Figure  3.  Example  of  granule  layer  cell  activated  by  dorsal 
raphe  stimulation.  Each  trace  formed  by  five  beam  sweeps.  From 
top  to  bottom  the  traces  indicate:  control  baseline,  30,  40, 
and  60  uA  stimulus  intensity.  Scale  markers  denote  5msec  and 
lmV. 

The  small  number  of  cells  encountered  in  the  granular 
layer  that  responded  to  our  stimulation  was  disappointing. 
However,  the  highest  number  of  responsive  cells  were  identi¬ 
fied  during  the  latter  part  of  the  research  period  following 
some  procedural  modifications.  We  now  believe  that  our  origi¬ 
nal  stimulating  arrangement  may  have  been  causing  some  damage 
to  the  raphe  neurons,  thus  lessening  the  probability  of  produ¬ 
cing  normal  stimulus  responses.  Because  of  time  limitations  we 
proceeded  with  the  iontophoretic  studies  alone  rather  than 
combined  with  stimulation  effects. 

IV.  IONTOPHORESIS  QL  SERCTONEPGIC  AGENTS 

At  best  one  could  say  that  the  literature  on  neuronal 
responses  to  local  application  of  serotonergic  compounds  is 
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varied  and,  in  some  cases,  actually  contradictory  and  confusing 
Part  of  the  problem  can  be  atributed  to  the  existance  of  more 
than  one  class  of  serotonin  receptor  (18,13).  An  attempt  has 
been  made  to  categorize  these  classes,  5-HT^  and  5-KT2,  into 
inhibitory  and  excitatory  receptors,  respectively  (1)  and  this 
does  aid  in  organizing  the  literature,  however,  it  is  the  more 
rigorous  use  of  intracellular  recording  techniques  that  show 
the  most  promise  for  determining  serotonin's  synaptic 
functions.  Cne  clear  picture  that  is  emerging  is  the  important 
role  of  K+  conductance  in  the  mediation  of  serotonin's  effects 
(15-17) . 

To  begin  our  investigation  of  the  effects  of  local 
application  of  serotonin  in  the  granular  layer,  we  wanted  to 
replicate  the  findings  reported  by  Bloom  et  al  (7)  who 
described  increased  activity  of  granule  cells  in  response  5-HT 
iontophoresis.  This  would  be  expected  if  the  transmitter  were 
stimulating  postsynaptic  receptors  of  mossy  fiber  synapses 
within  the  glomeruli.  A  multibarrel  recording  arrangement  was 
emlcyed  to  test  for  the  effects  of  serotonergic  receptor 
antagonists  during  transmitter  application. 


f-iETHCDS 

Seven  barrel  glass  capillary  pipette  electrodes  (Frederick 
Haer)  were  drawn  and  broken  to  a  tip  diarr.eter  of  6-10  urn.  Two 
of  the  outer  barrels  were  filled  with  1.0  monosodium  glutamate 
and  0.15  M  M a C 1 .  The  NaCl  barrel  was  used  for  current 


balancing  and  control  ejections.  The  other  barrels  contained 
combinations  of  5-hyd r oxy-tryp t a m ine  creatinine  sulfate  (0.5 
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M)  and  receptee  antagonists  including  cyproheptadine  KCi  (14.6 
mM)  ,  ir.ethiserg  ide  maleate  (0.C1  M)  M).  The  pH  of  all  chemicals 
used  were  adjusted  as  needed  and  each  solution  was  filtered 


(Millipcre  Corp. ,  0.22  urn).  The  chemicals  were 
electrophoretically  applied  to  neurons  by  calibrated  DC  cur¬ 
rents  using  a  Neurophore  BH-2  microiontophoresis  system 
(Medical  Systems  Corp.).  Control  procedures  for  assessing 
microiontophoretic  effects  were  carried  out.  A  retaining  cur¬ 
rent  of  5  nA  was  utilized  to  prevent  the  spontaneous  diffusion 
of  active  ions  from  the  capillary  barrels.  To  study  the 
interaction  between  chemicals  one  was  applied  continuously 
while  the  other  was  applied  at  regular  intervals. 


RESULTS 


A  total  of  33  cells  were  tested  with  serotonergic 


agents  and  glutamate.  Five  of  these  cells  did  not  display  a 
reliable  response  to  glutamate  and  are  excluded  from  this 
discussion.  Cf  the  remaining  28,  the  majority,  nineteen,  were 
inhibited  by  5-HT.  An  example  of  this  response  is  illustrated 
in  Figure  4.  The  reduction  in  activity  is  significant  and 
endures  beyond  the  period  of  drug  application.  At  higher  doses 
(  >  50  nAmps)  several  cells  oscillated  in  activity  before 
returning  to  a  normal  baseline.  Application  of  miethysergide 
using  current  levels  that  did  not  directly  affect  cell 
activity  had  no  or  very  little  affect  on  this  supressicn  of 
activity.  There  are  several  reports  in  the  literature  of  5-HT 
receptor  antagonists  having  minimal  affect  on  serotonin 
induced  inhibition  (1,15,16). 
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Figure  5.  Example  of  increased  activity  of  granule  cell  in 
response  to  serotonin  application.  This  effect  could  be 
partially  blocked  by  ejection  of  methysergide  (Keth) . 


Despite  the  limited  number  of  cells  that  responded  to 
stimulation  the  results  are  very  exciting  in  terms  of  providing 
a  frame  work  for  deliniating  distinct  serotonergic  pathways  based 
on  the  type  of  response  illicited  in  granule  cells.  The 
prolonged  inhibitory  response  indicates  a  type  of  humoral 
modulation  that  could  be  mediated  by  the  fine  serotonergic 
fibers  that  do  not  appear  to  make  definite  synaptic  contacts 
with  target  cells  within  the  granular  and  molecular  layers. 
The  fact  that  some  granule  cells  did  respond  with  short 
latency  bursts  supports  the  idea  of  serotonergic  mossy  fiber 
innervation.  At  the  present  time  we  are  concentrating  on 
integrating  the  stimulation  and  iontophoretic  techniques  as  we 
had  originally  planned. 


28.12 


e* 

£ 


I 


w 

v« . 

v 

W 

Kv 

•< 


6? 


10  sec 


Figure  4.  Reduction  of  granule  cell  activity  in  response  to 
pulses  of  serotonin  (5-HT).  Rows  are  from  continuous  strip 
chart  record  of  activity  (spikes/sec)  of  single  cell.  Bars 
indicate  duration  and  intensity  (nAmps)  of  current 
application.  Application  of  5-HT  receptor  antagonist 
methysergide  (Meth)  did  not  block  inhibitory  effect.  Glu 
indicates  glutamate. 

Of  the  nine  cells  that  were  not  inhibited  by  5-HT, 
seven  displayed  increased  activity  and  two  were  not  affected 
by  any  level  of  5-HT  ejection  current.  Figure  5  illustrates 
this  excitatory  response  and  as  can  be  seen  the  effect  could 
be  blocked  by  m.ethysergide.  The  excitatory  response  differed 
from  that  produced  by  glutamate  in  that  it  was  -not  as  imme¬ 
diate  in  onset  and  offset,  however,  the  excitation  never 
display  the  long  duration  that  characterized  the  inhibitory 
responses . 
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!  so  luted  cerebellar  glumorui.  :  vide  a  relatively 

homogenous  suoceKular  fraction,  w  :h  :a  n  be  used  to  stud;,  me 
biocnemical  events  related  to  chemical  transmission  within  a 
Weil-characterized  central  synapse.  Choune  and  eihanolamine 
pnospno  .ransferase  activities  were  identified  arid  parlially 
characterized  in  this  nerve  ending  preparation.  Choline 
phosphotransferase  associated  with  tne  glomerular  particles 
required  Mg1*,  whne  ethanolamine  phosphotransferase  required 
MnJ*  for  optimal  activities,  both  enzymes  were  inhibited  by 
exogenous  Cai*.  Tne  apparent  Vuii.x  values  were  „5. J  and  10.0 
nnK.i,  hr/mg  protein  for  the  choline  ana  ..  jrio!..i,.i.nc-  phosphotruns 
ferases,  respectively.  The  apparent  Krt  '.  due  .  r  •  .v*  ODPc.-ic  line 
substrate  was  23.6  u  M,  and  the  Km  for  ooPethanotamine  was 
8.i  u  d.  Neither  enzyme  responded  to  the  various  adenine 
nuc.eotides,  neurotrar.smitters  or  neurotransnutter  agonists 
tested.  However,  exposure  of  the  glomerular  particles  to 
cytidine  nucleotides  inhibited  ethunolanune  phosphotransferase 
activity  and  stimulated  choline  phosphotransferase  activity. 
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Tne  erefcella:  glomeruli  consist  of  Ir.e  large  terminals  of 
the  messy  fibers,  granule  cell  at  rut  riles,  cio  1 1?  1  celi  terminals 
dr.  1  dendrites  and  a  protective  guai  sheath  Tne  synaptic 

connections  in  this  complex  have  beer,  described  ;4i.  Methods 
have  Deen  reportej  for  the  isolation  of  irtact  and  functional 
glomerular  particies  .5-7).  The  enriched  giomeruuir  fraction 
provides  a  useful  model  for  the  investigation  of  synaptic  events, 
since  the  isolated  glomeruli  retain  their  morpnoiogicai  and 

...rial  integrity.  The  mossy  ficer  terminals  retain  many  of 
the..-  ,-ivnaptic  connections  and  are  filled  with  syr  t;  tic  vesicles 
(5,6,8).  7  ne  glomerular  particles  respire,  ac-  iveiy  ransport 

r.eurotrunsn.it'.ers  arid  amino  acids  and  the)  contain  the  enz  tints 
involved  in  rrutoc.nondrial  function  and  r.eurotrar.  ...tier  syn*  heats 
i6-9).  Tcrridi  et  ai.i8)  have  recently  described  an  improved 
method  for  the  purification  of  cerebellar  glomeruli. 

Chonne  arid  elhanolanune  phosphotransferases  were  identified 
and  partially  characterized  in  the  purified  girmeru.ar  fraction 
in  order  to  further  assess  the  metnoolic  capabilities  of  this 
unique  nerve  ending  preparation.  Choline  phosphotransferase 
<CD°rholine:  i,2-dirati>  igiycerol  :.  phosphotransferase; 

EC  2.3. 7.2)  ana  elhar.olamme  phosphotransferase  'DPetnanc lamine 
1,2-diradylgiycerol  ethanolamine  phosphotransferase;  F.O  2.8.7. 1) 
catalyze  the  final  steps  in  the  synthesis  of  the  chchne  and 
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ethanolamine  glycerophosphohpids,  respectively.  The  enzymes 
catalyze  the  transfer  of  either  phosphochoiine  or  phosphoethanol- 
ami.:e  from  the  cytidine  nucleotiae  carrier  to  a  diglyceride 
acceptor  (10).  These  enzymes  have  been  identified  in  other  CNS 
membrane  preparations.  They  are  most  active  in  cerebral 
microsomes  (11-13)  and  they  have  been  assayed  in  isolated  neurons 
and  glia  (14).  They  have  also  been  identified  in  purified  CNS 
myelin  (15,16),  microsomes  prepared  from  the  hy pomyelinnted 
brains  of  jimpy  and  quaking  mutant  .nee  ;  17,18),  and  cerebral 
synaptosomes  (19,20).  It  has  been  suggested  that  the  phospho¬ 
transferases  associated  with  syr. aptcsom.es  may  be  involved  in  the 
memurane  events  related  to  neurct  rant-mission,  since-  they  are 
influenced  by  neurotransraitters  an  ,  oAMP  (20  . 

fne  isolated  cerebellar  glotia  ruii  were  use:  t,.  show  .  ie 
presence  cnohr.e  and  ethanoiamine  pnesphotrausterases  in 
cerebellum,  since  they  nave  r.ot  vet  been  identified  in  cerebellar 
memorane  preparations.  A. so,  tne  phosphotransferases  were 
purtia.iy  onnraeteri/.ed  prior  to  assessing  their  potential 
involvement  :n  synaptic  events  in  tnis  r.erve  ericina-  preparation, 
{’hot  phot ransferase  activities  were  measured  in  the  presence  of 
r eurotransmitters  thought  to  be  endogenous  to  cerebellar 
g.oineruh,  tnoir  agonists  and  nucleotides  implicated  m  either 
s  t ;  m.  u  1  u  a-  sec  ret  ;on  coupling,  or  p  nosp.-.onpid  svntnesis. 
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EXPERIMENTAL  PROCEDURES 


MATERIALS 

The  ! methyl-  14C J-cytidine  diphosphocholine  and  the 
Aquasol  II  were  obtained  from  New  England  Nuclear,  while  the 
[ethunolaraine-1 ,2-14C]-cytidine  diphoaphoethanolamine  was 
purchased  from  ION.  The  radioactive  cytidine  nucleotides  were 
diluted  with  unlabeied  CDPchohne  and  CDPethanolamine  (Sigma 
Chemical  Co.).  The  neurotransmitters,  neurotransmitter  agonists, 
adenine  arid  cytidine  nucleotides,  1,2-dioiein  and  Ficoll  400  were 
purchased  from  Sigma  Chemical  Co. 

ISOLATION  i:i-  CEREBELLAR  GLOMERULI 

A  purified  glomeruli  fraction  (PGF)  was  prepared  from  bovine 
cerebellar  cortex.  Cerebella  were  obtained  at  a  s.aughterhouBe 
witnin  15  minutes  of  sacrifice.  They  were  placed  in  ice  for 
transport  and  the  vermal  cortices  were  removed  Dy  dissection. 

This  tissue  was  rinsed  in  ice-cold  saline  and  minced  with 
scissors  prior  to  manual  homogenization  in  9  volumes  of  0.3  M 
sucrose,  using  a  modified  Dounce  homogenizer,  according  to  the 
method  of  iiajos  et  al.(5).  Magnesium  ions  (1  mM  MgSO«)  were 
included  in  all  solutions  used  in  the  preparation  of  the  PGF.  The 


procedures  used  to  isolate  the  enriched  glomeruli  fraction  have 


icently  been  described  by  Terrian  et  al.(8).  A  number  of  sub¬ 


fractions  were  obtained  during  the  preparation  of  the  PGF, 
including  the  crude  nuclear  and  crude  mitochondrial  fractions. 
These  fractions  contain  the  microsomal  elements.  Medullated 
fibers  were  separated  from  the  crude  glomeruli  fraction  in  order 
to  obtain  the  purified  glomeruli  fraction.  Each  of  these  sub¬ 
fractions  was  assayed  for  choline  and  ethanolamine  phosphotrans¬ 
ferase  activities.  Aliquots  of  each  PGF  preparation  were  taken 
for  determination  of  protein  concentration  (21).  The  remainder 
was  diluted  with  9  volumes  of  10  raM  Tris-HCl  buffer,  pH  7.45, 
prior  to  estimation  of  choline  and  ethanolamine  phospho¬ 
transferase  activities. 


PHOSPHOTRANSFERASE  ASSAYS 


Choline  and  ethanolamine  phosphotransferase  assays  were 
performed  for  30  minutes  at  37°C  in  a  total  volume  of  1.0  ml. 

Typical  incuDations  contained  1-2  rag  PGF  protein  and  20  to  80  u  M 
1 14C]CDPchonne  or  [  14C]CDPethanolamme  (each  at  2  nCi/nmol)  in 
10  raM  Tris-HCl  buffer,  pH  7.45.  Choline  phosphotransferase 
assays  normally  contained  100  mM  MgClz,  while  ethanolamine 
phosphotransferase  assays  included  19  m.Vl  MnClz.  The  neuro- 
trur.smitters,  neurotransmitter  agonists,  cytidine  and  adenine 
nucleotides  were  present  at  1  mM  concentrations.  The  1,2-diolein 
was  suspended  by  high  speed  vortexing  for  five  minutes  in  10  rr.M 


Tris-HCl  (pH  7.45),  in  the  presence  of  0.022%  Triton  X-iOO.  The 
1,2-diolein  concentrations  ranged  from  0.5  to  10  mM,  in  order  to 
determine  Km  values  for  the  diglyceride  substrate.  Triton  X-iOO 
was  found  to  provide  for  greater  phosphotransferase  activities 
ihun  either  Brij  35  or  Tween  80  and  had  a  final  concentration  of 
0.02%  in  the  incubations  which  included  1,2-diolein.  Some  of  the 
glomerular  preparations  were  exposed  to  5  mM  Tris  buffer  for  60 
min  at  4°C  for  lysis  of  the  vesicles  according  to  Lai  and  Clark 
(22).  All  reactions  were  stopped  by  the  addition  of  5  ml  of 
chloroform:  methanol  (2:1,  v:v)  and  the  total  lipids  were 
extracted  and  washed  according  to  Folch  et  al.(23). 

The  radioactivity  in  the  total  lipid  extract  was  used  as  the 
measure  of  phosphotransferase  activities  after  t.\.n  Liver  cnrcinu- 
tcgraphy  (24)  was  used  to  show  tnat  tr.e  1 14C  CL. -'choline  labeled 
only  the  chcnr.e  glycerophospholi p:ds  and  the  f  i  h.  'CDPethanol- 
amir.e  Labeled  only  the  ethanolamme  glyceropncspr.ohpias.  The 
incorporation  of  radiolabeled  substrates  was  determined  by  liquid 
scintillation  counting  m  a  becrtman  LS-23U  counter,  with  Aquasol 
I."  is  the  cocktail.  F-tests  were  performed  to  sn  w  significant 
differences  in  pr.oschotransferasci  activities  uue  iv.  exposure  of 
the  FGF  to  neurotransmitters,  transmitter  agonists  or  nucleo¬ 
tides.  Student’s  t-test  was  then  used  t  determine  wn::h 
treatment  groups  were  significantly  different  :'r>  •  untreated 
controls. 


R  E  S  U  L  i  i> 


Characterization  m  Phosphotransferase  Acfvitie 

Choline  and  ethar.olamirie  phosphotransferase  activities  were 
detected  in  all  membrane  fractions  isolated  from  bovine 
cerebellar  cortex,  including  the  purified  glomeruli  fraction. 

The  phosphotransferases  were  partially  characterized  in  the  PGF. 
The  incorporation  of  radiolabled  precursors  into  their  respective 
phospholipids  were  enzymic,  since  both  activities  were  abolished 
by  exposure  to  100°C  for  ten  minutes.  Also,  the  rates  of  isotope 
incorporation  were  linear  over  30  minutes  of  mcubaf.cn,  and  the 
activities  were  dependent  on  protein  concentrations,  oetween  0.2 
and  3.0  mg  gVmcruiar  protein  (data  not  shown;.  Beta  phos,  no- 
transferase  enzymes  exhibited  a  pH  opt. mum  near  «.0  (Figure  1). 
Routine  assays  were  tnen  carried  out  at  27^0,  for  30  minutes,  at 
pH  7.15,  in  the  presence  of  1-2  mg  glomerular  protein. 

The  cation  requirements  of  the  phosphotransferases  were 
dotermi:  Choline  phosphotransferase  was  most  active  in  the 

presence  of  100  mV.  MgCU,  ...mie  ethanola.T.me  pl.osphotransierase 
activity  was  optimal  in  the  presence  of  10  mM  N'.nCh.  Both 
pnosphotransferases  were  inhibited  b  Ca2*  in  the  presence  of 
optiniui  concentrations  of  either  V. g : *  c  r  Mn;‘  Table  !). 


Distribution  or  Phosphotransferases  in  Subceiluiar  Fractions 

Choline  and  ethananoiamine  phosphotranserase  activities  were 
.uer.tified  in  all  particulate  fractions  isolated  during  the 
preparation  of  the  PGF  (Table  Ii).  The  phosphotransferase 
activities  in  the  cru<“«.  ..uclear  and  crude  mitochondrial  fractions 
were  almost  twice  tact  of  the  homogenate.  The  supernatant 
recovered  following  sedimentation  of  the  crude  glomeruli  fraction 
contained  phosphotransferase  activities  that  were  about  10%  of 
those  found  in  the  homogenate  (data  not  shown).  When  the  crude 
glomeruli  fraction  was  further  purified  by  sedimentation  through 
1.2  M  sucrose,  the  medulla  ted  fiber  fraction  ewh.;  tied  a  decline 
in  phosphotransferase  activities  when  compare  i  '  the  crude 
glomeruli  fraction,  while  the  activities  in  the  ;•  ir.fied 
glomeruli  fraction  were  about  doubled  compared  to  the  crude 
preparation.  The  purified  glomeruli  fraction  had  phosphotrans¬ 
ferase  activities  wnich  were  comparable  to  those  in  the  homogen¬ 
ate.  Also,  nypontonic  lysis  of  the  PGr  particles  by  the  method 
of  I.ai  and  Clark  (22)  did  not  significantly  a. ter  the  activity  of 
either  enzyme. 


Kinetic  Parameters  and  T reatui“rit  Effects 


Estimates  of  Km  and  Vmax  values  were  made  for  both  enzymes 
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in  the  PGF.  Vraax  values  were  determined  m  the  presence  of  10  n.M 


1,2-diolein  and  either  100  y.Vl  CDPcholine  or  CDPethanolainine. 

The  Kra  values  were  determined  using  various  concentrations  of 
diglyceride  and  nucleotide  substrates.  The  results  are  shown  in 
fable  III.  The  apparent  Vmax  value  for  tne  choline  phosphotrans¬ 
ferase  was  3.5  times  greater  than  the  value  for  the  ethanolamine 
phosphotransferase.  The  apparent  Km  values  for  the  choline 
phosphotransferase  were  2.9  mM  for  the  diglvceride  substrate  and 
28.6  y  M  for  the  CDPcholine.  Ethanolamine  phosphotransferase 
exhibited  similar  Km  values  for  the  1,2-diolein  and  the  cytidine 
nucleotide. 

Isolated  glomeruli  were  exposed  to  exogenous  neurotrans¬ 
mitters,  neurotransmitter  agonists  and  nucleotides  which  have 


been  implicated  in  transmission  processes  and  tr.e  affects  of  tne 
treatments  on  phosphotransferase  activities  were  -mined 

(Figure  2).  Exogenous  diglvcerid-s  were  not  added  *o  the  incuba- 
t.ons  and  CDPcholine  and  CDPetnar.oiamine  concentrations  were 


20  ill:,  ATP  ar.a  cAMP  (1  ruM)  hud  no  eifect  on  the  activity  of 
either  enzyme,  when  compared  to  untreated  controls.  Equimoiar 
concentrations  (1  r.iM)  of  the  neurctrar.smitters  norepinephrine 
(ME),  o-hydroxytryptamine  (5-HT)  and  gamma-aminobutyric  acid 


(GABA),  and  the  transmitter  agonists  muscimol,  ynsqualic  acid 
and  oarbarr.y lchohne,  also  had  no  effect  on  the  activity  of  either 
phosphotransferase.  However,  cytidine  nucleotides  induced  signi¬ 


ficant  and  opposite  effects  on  the  enzyme  activities.  Choline 
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DISCUSSION 


The  ability  to  isolate  cerebellar  glomeruli  as  a  relatively 
homogenous  subcellular  fraction  has  enabled  investigators  to 
study  the  biochemical  events  underlying  synaptic  transmission 
within  a  central  synapse  that  has  been  extensively  character¬ 
ized.  Choline  and  ethanolamine  phosphotransferase  enzyme 
activities  were  identified  in  isolated  glomerular  particles  as 
part  of  continuing  studies  of  the  biochemical  events  related  to 
synaptic  activities  in  this  nerve  ending  preparation.  The 
enzymes  were  partially  characterized,  in  order  to  determine 
their  general  requirements,  prior  to  assessing  tneir  involvement 
in  glomerular  functions  by  testing  the  effects  of  reurotransmit- 
ters  and  nucleotides  believed  to  be  endogenous  '  )  cerebella. 
glomeruli.  Also,  there  are  no  known  reports  cn  phosphotrans¬ 
ferase  activities  in  tne  cerebellum. 

Most  of  the  requirements  of  the  PGF  enzymes  were  similar  to 
those  for  phosphotransferases  from  other  regions  an j  subcellular 
fractions  of  the  C.NS.  Enzyme  activities  were  dependent  on  pro¬ 
tein  concentrations,  were  linear  over  30  minutes  of  .r.cubation 
anu  were  abolished  by  exposure  to  1G0°C  for  ten  minutes.  Both 
enzymes  had  a  pH  optimum  near  8.0,  which  is  consistent  with 
reported  values  (11,  16).  Hthanolamine  phosphotransferase 
required  10  mM  Mn2'  for  optimal  activity,  wmch  is  similar  to 
values  reported  for  brain  microsomes  (25),  purii:ej  C.NS  myelin 


29.12 


aV.’.-.V.V 
V.v,  v.V.V. 


.  -V«\  o. 


•VA 


(16)  and  synaptosomes  isolated  from  cerebral  cortex  (20). 

However,  choline  phosphotransferase  required  100  mM  Mg1*,  which 
is  2  to  10  times  greater  than  values  reported  for  other  CNS 
membrane  preparations  (11,  20,  26).  Both  enzymes  were  inhibited 
uv  C a2*,  as  has  been  snown  in  rat  brain  microsomes  (11), 
isolated  neurons  and  glia  (14)  and  cerebral  synaptosomes  (20). 

Phosphotransferase  activities  were  measured  in  all  parti¬ 
culate  fractions  isolated  during  the  preparation  of  the  PGF,  in 
order  to  determine  the  subcellular  distribution  of  the  enzymes 
in  cerebellar  cortex.  Both  enzymes  were  present  in  all  frac¬ 
tions  and  the  distributions  were  similar  to  those  reported  for 
other  CMS  regions.  The  crude  nuclear  and  crude  mitochondrial 
fractions  were  the  most  active  arid,  this  is  consistent  wdth. 
results  from  other  brain  regions,  since  these  fractions  contain 
the  microsomal  elements  of  the  cerebeii.ir  cortex  (5)  and  the 
microsomal  fraction  is  the  most  enriched  source  of  phosphotrans¬ 
ferase  activities  in  nerve  tissues  (11,  1 3 ,  16).  However,  nuc¬ 
lear  envelopes  and  mitochondrial  fractions  also  contain  these 
enzymes  (12,  19,  26)  and  these  membrane  bounded  organelles  are 
also  found  in  the  crude  nuclear  and  mitochondrial  fractions. 
-Sedimentation  of  the  crude  glomeruli  fraction  through  1.2  V 
sucrcse  separates  the  medullated  fibers  from  the  purified 
giomeruh  aria  resulted  in  a  moderate  enrichment  of  the 
activities  in  the  PGF,  since  the  medullated  fibers  contained 
lower  activities  than  the  purified  glomeruli. 


Although  there  was  no  enrichment  of  enzyme  activities  in 
the  PGF  when  compared  to  homogenate,  there  were  substantial 
activities  in  the  PGF.  Further  work  is  required  to  determine 
which  of  the  PGF  membranes  contain  the  phosphotransferases, 
since  the  PGF  includes  neuronal  and  glial  constituents  and 
subcellular  membrane  components,  such  as  mitochondria  and  endo¬ 
plasmic  reticulum.  Regardless  of  the  relative  contributions  of 
the  various  membrane  components,  it  is  clear  that  the  purified 
glomeruli  fraction  isolated  from  cerebellar  cortex  is  able  to 
synthesize  choline  and  ethanolamine  glycerophospholipids. 

The  kinetic  parameters  for  the  enzymes  were  similar  to 
those  reported  for  other  nerve  ending  preparations.  The 
apparent  Vmax  value  for  the  choline  pnesphotrar.ster3.se  in  .he 
PGF  was  3.5  times  greater  than  the  Vmax  '"or  trie  ethanolamine 
phosphotransferase.  The  greater  activity  of  the  choiine  phos- 
photi  erase  is  consistent  with  tne  previously  observed 
differences  m  the  relative  distribution  of  these  enzymes  in 
other  CNS  membrane  preparations  ( 1.1-14)  and  reflects  the  uneven 
distribution  of  the  choline  and  -.thanolamine  glyeercphospho- 
lipids  in  cerebellar  cortex  (37).  The  activities  of  tm-se 
enzymes  in  the  PGF  were  less  than  the  activities  in  Pram 
microsomes  (28),  but  they  were  similar  to  tnose  reported  for 
cerebral  synaptosjti.es  (20).  Both  enzymes  had  comparable 
affinities  for  the  cigiyceride  and  cytidine  nucleotide 
substrates  and  tm-se  apparent  Km  values  were  similar  to  those 


described  in  cerebral  synaptosomes  (20). 

Even  though  the  observed  characteristics  of  the  PGF  enzymes 
were  similar  to  those  reported  for  other  nerve  ending  prepara¬ 
tions,  the  mechanisms  involved  in  control  of  their  activities 
may  be  different.  The  phosphotransferases  in  the  PGF  were 
unaffected  by  1  mM  ATP  and  cAMP,  in  the  presence  of  subsatur¬ 
ating  concentrations  of  diglvcerides  and  CDPcholine  and  CDP- 
ethanolamine.  However,  adenine  nucleotides  have  been  shown  to 
affect  phosphotransferase  activities  in  other  membrane  prepara¬ 
tions.  Both  phosphotransferases  are  inhibited  by  ATP  in  rat 
liver  microsomes  (29-31),  but  only  ethanolamine  phosphotrans¬ 
ferase  activity  is  inhibited  in  chicken  brain  microsomes  (32). 

Also,  1  mM  ATP  stimulates  choline  phosphotransferase  activity, 
but  not  ethanolamine  phosphotransferase*  activity  u,  cerebral 
synaptosomes  and  the  same  effect  is  observed  n  the  presence  of 
1  pM  cAMP  (20).  "hese  effects  may  be  related  to  chemical 
transmission  processes  observed  in  cerebral  synaptosomes. 
However,  such  influences  were  not  expressed  in  the  isolated 
glomeruli,  since  ATP  and  cAMP  had  no  effect  on  the  activity  of 
either  enzyme  under  the  present  experimental  conditions. 

The  reurotransmitters  NE,  5-HT  and  GABA,  and  the  trans¬ 
mitter  agonists  muscimol,  quisqualic  acid  and  car bamylcholine, 
also  had  no  effect  on  the  activity  of  either  phospnotransferase 
enzyme  in  isolated  cerebellar  glomeruli.  These  chemicals  were 
chosen  because  they  have  been  implicated  in  nervous  system 
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function  in  general  and  glomerular  function  in  particular 
(33,34).  Subsaturuting  concentrations  of  diglycerides  and 
CDPcholine  and  CDPethanolamine  were  used  in  all  the  treatment 
experiments,  because  the  enzymes  are  unlikely  to  be  saturated  in 
v-va,  and  subsaturating  substrate  concentrations  should  allow 
for  the  observance  of  either  competitive  or  noncompetitive 
treatment  effects.  Treatment  concentrations  of  1  mM  were  chosen 
because  such  concentrations  have  been  shown  to  be  effective  in 
other  membrane  preparations  (20,32).  Therefore,  the  lack  of 
transmitter  effects  on  the  activities  of  these  enzymes  is 
interpreted  to  indicate  that  neither  enzyme  is  involved  in 
receptor  mediated  processes  in  this  nerve  ending  preparation. 
However,  more  extensive  screening  must  be  done  in  order  to 
eliminate  the  possibility  that  the  phosphc •trnnsferavo  >  are 
involved  in  the  transmission  processes  related  to  a  particular 
neuro  transmit  ter. 

Although  neither  phosphotransferase  responded  to  neuro- 
trar.smitters  or  agonists,  they  were  botn  affected  by  exogneous 
cyudine  nucleotides.  The  presence  of  i  mM  CTP,  CPP  or  CMP 
stimulated  choline  pnosphotransfera.se  activity  and  inhibited 
ethunolamine  phosphotransferase  activity  in  the  PGP.  Although 
tnere  is  no  Known  role  for  the  cytidme  compounds  in  neurotrans- 
mission,  they  appear  to  be  involved  in  the  regulation  of  choline 
and  ethanolamme  glycerophosphoiipid  synthesis  in  cerebellar 


glomeruli.  This  regulation  may  be  directly  expressed  at  the 
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level  of  the  enzymes,  or  it  may  involve  control  of  endogenous 
substrate  levels.  For  example,  cytidme  nucleotides  have  been 
shown  to  alter  the  rate  of  phospnatidic  acid  formation  m  rat 
brain  homogenates  (35),  which  may  affect  the  availability  of 
endogenous  diglycerides.  Also,  we  found  that  CTP,  CDP  and  CMP 
stimulated  the  incorporation  of  [14C]acetate  into  cerebral 
diglycerides  in  vitro  and  in  vivo  (unpublished  results).  The 
cytidine  nucleotides  may  also  affect  the  endogenous  levels  of 
CDPchoiine  or  CDPethanolamine,  as  has  been  shown  in  virus 
infected  HeLa  cells  (36).  Further  work  must  be  done  to  clarify 
the  effects  of  the  cytidine  nuleotides,  since  these  compounds 
appear  to  be  involved  in  the  control  mechanisms  for  the 
synthesis  of  the  major  phospholipid  constituents  of  the 
associated  membranes. 
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FIGURE  LEGENDS 


Figure  I.  The  effects  of  pH  on  the  activities  of  choline  and 
ethanoiamine  phosphotransferase  enzymes  in  the  purified  giomeruii 
fraction.  The  assays  were  performed  as  described  in  the  Experi¬ 
mental  Procedures,  while  the  buffer  pH  was  varied  from  6.0  to  9.0. 
Choline  phosphotransferase  assays  included  100  mM  MgCli,  while 
ethanoianune  pnosphotransferase  assays  included  10  mM  MnCh.  The 
results  are  given  as  the  mean  values  of  at  least  three  separate 
determinations. 
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Figure  2.  The  effects  of  nucleotides,  neurotrar.smitters  anu 
neurotransmit.er  agonists  on  choline  and  ethano .amine  phospho¬ 
transferase  activities  in  the  purified  g.omeruli  fraction.  The 
assays  included  20  uM  ( I4C  jCDPcholine  or  [  14C  JCDr'ethanoiamine. 

The  neurotrnnsmitters,  transmitter  agonists  and  nucleotides  were 
included  at  1  mM  concentrations.  Diglycerides  were  not  added  to 
the  incubations  and  the  assays  were  perfoi.nea  as  previously 
described.  The  results  were  obtained  from  at  least  six  separate 
determinations.  (NEinorepinephrine,  GABAigamma-aminobutyric  acid, 
5-HT(5-hydroxytryptaminer,  i*p  <  0.0 1;  **p  <  0.00'.  compared  to 
untreated  controls;  Student’s  t-tcsll. 
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TABLE  I 


CATION  DEPENDENCE  OF  CHOLINE  AND  ETHANOLAMINE 
PROS PHuTkA NS F ERASE  ENZYMES  IN  I  HE  PCRIFIED 
GLOMERULI  FRACTION 


nmol/ hr /mg  protein  ♦  S.D 


CHOLINE 

ADDITION  im.Ml  PHoSPHO  fRANSF ERASE 


ETHANOLAMINE 
PliUSPHOl  FtANSE ERASE 


none 


Mg  Cl  z  1.0 

1 0.0 
20.0 
100.0 
200.0 


MnClj  0.1 
1.0 
10.0 
20.0 
50.0 


CaCh  50.0 

200.0 


J.07  ♦  j.j3 


o.i  a  ♦  o.o4 
2.06  ♦  0.06 
■MO  ♦  G.j3 
4.04  +  0.48 
1.30  +  u.07 


1.54  +  0.03 
2.38  +  0-10 
0.37  +  0.18 
2.06  +  0.16 
nd 


nd 

0.04  +0.01 


O.il  +  0.>.  I 


0.86  +  C.  I  : 
0.84  *  0.12 

,i,  1  ♦  '.jj 

.  .  1  ♦  O.t'J 


i.2d  + 
1.28  + 


.1.35  +  O.  ;  1 

r.j 


Incubations  were  performed  at  M°C  for  30  minutes  in  10  mM 
Tris-HCl  buffer  (pH  7.45),  containing  !-2  mg  PGF  protein  and 
40  u  M  [  14C  ICDPchoime  or  20  iiM  I  1 4C  ICDPethanoiamme  leacr. 
at  2  nCi/nmoi).  The  incubations  containing  CaC.2  also 
contained  optimal  concentrations  of  either  MnCh  or  VgCl:. 

The  total  lip. .is  were  extracted  and  counted  as  described  in 
Experimental  Procedures.  The  results  are  expressed  as  nmol 
of  isotope  incorporaied/hour/mg  giomerular  protein,  nd  :  not 
determined. 


TABLE  II 


CHOLINE  AND  ET  KANO  LAM  IN E  PHOSPHOTRANSFERASE 
ACIiWTIES  IN  SL'BCELl.lLAR  FRACTION'S 
ISOLATED  FROM  CEREBELLAR  CORTEX 


nmol/ hr/ mg  protein  *  S.D. 


CHOLINE  ETHANOLA.MINE 

FRAU  TIONS  i  HuSPHOi HANS F ERASE  PHOSPHOTRANSFERASE 


HOM  o SENATE 

3.42  *  G.35 

i.76  ♦  u.66 

N L CL  EAR  FRACTION 

6.45  ♦  0.53 

3.18  +  0.57 

Ml  I  oCHGNDRiAl.  r  RAC. 

o.cl  *  U.u2 

2.4  5  t  0.29 

CRUDE  GLOMERULI 

!  .  -4 1  * 

l.u  r  0.21 

MEDULLA! ED  rIBLRS 

1.07  t  >'-24 

0.87  ♦  0.19 

PURIFIED  GLOMERULI 

3.56  ♦  0.36 

l.oi  ♦  0.40 

Assays  were  performed  as  described  :n  Experimental  Procedures. 
Each  suofraction  was  iso.ated  durirrf  .he  preparation  of  the  PGF 
an  1  all  were  suspended  in  10  rr.M  7ris-H0I  t  pH  T.iSi  and  .ramediat 
e!y  a.ssuM-d.  The  results  represent  the  activities  determined  in 
at  cast  tr.f-e  separate  subfraction  preparations. 


fable  nr 


ESTIMATES  uF  Km  AND  Vmax  VALUES  FOR  CHOLINE  AND 
KTHANOLAMINE  PHOSPHOTRANSFERASE  ENZYMES 
IN  THE  PLRIFT-D  OLOMERL'LI  F'kAC  .  IoN 


'  HOLIN' E 

PHOSPHo  FRANS  F  ERASE 


ETHANCLAMiNE 
PHoS  P  HO  1 1  LA  N  S  r  ERA  S  E 


ninoi/  hr/  mg  pn.  • . 


i  ,2-  :  :oiein  i  mM  / 


CDPchour.e  OM) 


'DPelhanoluritir.e  >  u  Mi 


Assays  w**r»*  p**rf.  rated  hs  described  in  Exper.r  •  .tal  Proce¬ 
dures,  except  ex  .d-r.o'js  di*lycer:des  » ».2-u. oiein <  ***re 
included  >•  -nee:. trillions  from  u.5  to  10. 0  mM.  arid 
!  i4U  .UDPcr.'.ur.'*  nr.  J  1  1 1C  !CDP«tr..»noiamtne  r.t  (.mirations 
were  varied  from  to  !u0  uM.  ’.  he  apparent  Km  and  t  max 
values  w ere  estimated  from  the  ream's  n  four  serarv.'* 
experiments,  i  voru.nj  to  riscr.tna.  a*  i  Cornish-p. .  a  ler.  •'.Y'* 
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ABSTRACT 


This  study  Is  sn  Integral  part  of  the  research  on  vortex 
shedding  fr om  a  splitter  plate  that  separates  a  low  speed  hot 
flow  and  a  high  speed  cold.  This  paper  extends  Soldsteln, 

Cheng,  Kovltz,  and  Chiu's  Make  solutions  to  the  f 1 om  configura¬ 
tion  Involving  the  asyeeetrlc  Mixing  of  two  streams  of  differ¬ 
ent  velocity  Mlth  prescribed  temperature  and  velocity  ratio  at 
the  trailing  edge  of  the  plate.  The  predicted  Make  structure  In 
the  proximity  of  the  trailing  edge  reveals  momentum  transport 
from  faster  to  slower  stream  Mhlch  shifts  the  point  of  zero 
shear  from  the  center  of  the  make  Into  the  slower  hot  stream. 
Effects  of  coupling  between  energy  and  momentum  due  to  property 
variation  in  the  presence  of  steep  temperature  gradients  are 
also  found  to  be  significant.  A  two  sided  mixing  layer  struc¬ 
ture  of  the  trailing  wake  and  it  probable  effects  on  vortex 
shedding  is  described  and  research  In  progress  for  Part  II  Is 


discussed 


INTRODUCTION 


The  physical  Mchanliat  and  conditions  for  ths  generation 
of  largs  seals  dynamic  structures  and  subsequent  growth  or 
damping  within  the  wake  of  bluff  bodies  has  become  an  Important 
area  basic  research  with  application  to  the  engineering  of 
combustors.  Fuel  efficiency,  noise  generation,  including 
rumble  which  may  lead  to  mechanical  damage  or  shortened 
component  life,  and  the  ability  of  the  bluff  body  to  stabilize 
the  flame  may  all  be  greatly  affected  by  the  generation  and 
subsequent  shedding  of  large  scale  structures  from  the  wakes  of 
bluff  bodies. 

Nany  experimental  researchers  have  reported  that  combus¬ 
tion  suppresses  vortex  shedding  from  the  wakes  of  bluff  bodies 
C 1—43 .  However,  experimental  studies  at  Wright  Aeronautical 
Propulsion  Laboratory  by  Roqummore  et  al .  £3-83  with  bluff  body 
stabilized  combustion  in  a  long  cylindrical  tunnel  produced 
much  evidence  of  vortex  shedding.  Bturgess  and  Byed  C91  pro¬ 
posed  that  the  vortex  shedding  was  the  result  of  acoustic 
Interaction  with  the  natural  frequencies  of  the  long  combustion 
tunnel.  Experiments  by  Roquemore  et  al .  £103  using  a  unique 
laser  sheet-1 lghtlng  technique  showed  the  formation  and  rolling 
up  process  of  vortices  on  the  wake  Interface  of  an  unducted 
bluff  body  combustor  operated  in  a  cold  flow  mode.  When  oper¬ 
ated  with  combustion  disturbances  grew  and  propagated  along  the 
interface  to  the  tip  of  the  wake,  but  the  characteristic  rol¬ 
ling  up  observed  in  the  cold  flow  was  absent  in  the  hot  flow 
cases.  These  experiments  are  providing  much  information  about 


the  types  o f  large  seal  a  dynamic  structures  that  occur  in  bluff 
body  makes  and  tha  conditions  undar  which  thay  occur  in  tha 
flow  f laid. 

Thaoratical  work,  baaad  on  knowledge  galnad  in  exper- 
1 manta,  la  naadad  to  ldantlfy  tha  physical  mac h an lama  which 
laad  to  tha  formation  of  tha  various  larga  seals  atructuras  in 
bluff  body  wakaa  and  to  dotarmina  tha  paramatars  which  control 
tha  growth  ratss  of  thaaa  atructuras.  Efforts  at  analysis  or 
dlract  numarlcal  simulation  of  thasa  flows  ara  hamparad  by 
thalr  comp laxity  Including  thalr  fundamantal  3-dlmanalonal 
natura  as  ravaalad  in  tha  films  of  Roquemore  at  al .  C103.  Evan 
2-dimansional  unstaady  computations  use  largo  amounts  of  coa»- 
puting  roaourcaai  3-di man si onal  unstaady  computations  with 
onough  nodas  to  avoid  grid  aansitlvlty  ara  prohlbitl voly  ex pen - 
siva  on  current  larga  computers.  Undar  thasa  circumstances  the¬ 
oretical  studies  which  deal  with  a  simplified  geometry  and  con¬ 
centrate  on  a  few  of  tha  characteristics  of  the  flow  considered 
most  important,  such  as  tha  present  of  shear  layer  with  a  large 
temperature  gradient  across  the  layer. 

In  an  initial  analytical  effort  in  tha  study  of  distur¬ 
bance  formation  and  growth,  Chiu  C 1 1 3  simplified  tha  geometry 
by  considering  tha  interaction  of  two  semi-inf inita  streams 
Additional  simplifying  assumptions  ware  tha  absence  of  body  or 
viscous  forces  with  tha  shear  layer  idealized  as  a  vortex  sheet 
in  tha  presence  of  an  initial  step  temperature  difference  across 
tha  streams.  Results  of  the  analysis  yielded  stability  condi¬ 
tions,  and  disturbance  growth  rates  and  propagation  velocities 


for  the  idealized  flow.  In  particular,  In  the  abaence  of  maaa 
injection,  the  flow  la  alwaya  unatable,  avan  In  tha  praaanca  of 
a  tamparatura  dlf faranca  acroaa  tha  atraaaa.  Howavar ,  aa  tha 
temperature  ratio  approachaa  infinity,  tha  rata  of  dlaturbance 
growth  approachaa  taro.  If  affacta  of  vlacoua  daaplng  wara 
taken  Into  account  anothar  point  of  nautral  atablllty  at  ao me 
finlta  tamparatura  ravi o  would  ba  expected. 

Tha  work  raportad  hara  aaaka  to  relax  thraa  of  tha  Major 
almpllfying  aaauaptlona  of  Chiu'a  initial  atudy.  Thaaa  include 
tha  aaaumption  of  an  lnflnltaly  thin  vortex  ahaat,  tha  aaeump- 
t i on  of  aami -1 nf 1 ni ta  atraaaa,  and  tha  aaauaptlon  of  an  lnvia- 
cld  fluid  aodal .  Tha  gaomatry  la  kapt  alapla  by  conaldarlng  tha 
flow  In  tha  wake  of  a  aplittar  plata  (figura  1>.  Tha  fraa-atraaa 
valocitlaa  of  tha  uppar  and  lowar  atraaaa  ara  diffarant  produc¬ 
ing  a  ahaar  layar  in  tha  downetraaa  of  tha  plata.  Tha  tampera- 
turaa  of  tha  two  atraaaa  ara  alao  diffarant.  For  daf lnltenaaa, 
tha  uppar  atraaa  la  takan  to  ba  faat  and  cold  coaparad  to  tha 
lowar  atraaa.  Tha  gravity  vactor  la  aaauaad  not  to  hava  a  com¬ 
ponent  In  tha  computational  plana,  and  therefore,  thla  choice 
of  free-atream  valocitlaa  and  tamparaturaa  haa  no  lmpllcationa 
In  regarda  to  tha  affacta  of  buoyancy  on  tha  atablllty  or  other 
character 1 ati ca  of  tha  flow.  Tha  choice  la  meant  to  correapond 
In  aoma  Important  aapacta  to  an  incoming  atraaa  of  cold  air 
interacting  with  a  hot  alowar  moving  atraaa  In  tha  recircula¬ 
tion  zona  behind  a  bluff  body  In  a  bluff  body  coabuator. 

The  planned  baala  for  thla  work  waa  tha  work  of  Ooldateln 
C 121 ,  and  later  that  of  Kovltz  C133,  and  Chiu  C14J.  Thaaa 


researchers  developed  solution*  in  the  torn  of  universal  func¬ 
tions  for  tha  flow  in  tha  naar  wake  of  a  flat  plata  which 
matched  Blasiua  prof i las  at  tha  trailing  adga  of  tha  plata.  Tha 
naar  waka  is • const dar ad  to  bo  a  prime  candidate  breeding  ground 
for  vortices  or  other  largo  scale  structures  which  grow  and 
propagate  into  tha  downstream ,  therefore  use  of  these  earlier 
methods  along  with  Judicious  use  of  modern  computational  meth¬ 
ods  appears  to  offer  the  opportunity  to  make  substantial  prog¬ 
ress  on  tha  problems  of  interest  in  this  study.  Unfortunately 
the  solutions  generated  in  this  earlier  work  could  not  be  used 
as  the  steady  state  basis  of  the  current  study,  because  that 
work  assumed  the  flowfleld  to  be  symmetric  about  the  centerline 
(the  free-stream  velocities  of  the  streams  were  assumed  to  be 
equal),  and  certain  property  variations  were  assumed  small,  in 
particular  the  density-viscosity  product,  to  allow  decoupling 
of  the  momentum  and  energy  equations.  In  fact  as  the  tempera¬ 
ture  of  air  at  atmospheric  pressure  varies  from  300K  to  1200K, 
property  variations  can  be  quite  significant!  the  density- 
viscosity  product  varies,  for  example,  by  36  percent.  Mith  the 
availability  of  computers  and  modern  computational  techniques, 
decoupling  of  the  momentum  and  energy  equations  is  not  required 
to  obtain  a  solution. 

The  effects  of  shear  and  of  property  variation  due  to 
large  temperature  gradients  in  the  flowfleld  are  considered  to 
be  of  central  Importance  in  the  study  of  the  growth  of  distur¬ 
bances  at  the  interface  between  the  two  streams.  Therefore, 
this  study  has  been  divided  into  two  parts.  The  first  part  pro— 
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vid 


teady  flow  general 1 zatl on  of  oar 11  or  work  which  allow* 


for  streams  of  different  velocities,  and  taka*  battar  account 
of  proparty  variation  within  tha  flowflald.  Tha  *acond  part 
ancompa**a*  tha  un*taady  stability  analysis  of  tha  generalized 
spllttar  plata  waka  flow. 

Tha  ramaindar  of  this  papar  will  daal  with  Part  I.  Tha 
formulation  of  tha  staady  flow  problem  with  its  generalizations 
are  presented,  followed  by  a  discussion  of  applicable  numerical 
techniques.  Tha  formulation  leads  to  a  sequence  of  systems  of 
ordinary  differential  equations.  A  computer  program  which 


solves  the  zero  order  system  is  included  in  the  appendix. 
Solutions  of  the  zero  order  system  are  presented  and  discussed. 


OBJECTIVES 


Tha  objactlvas  of  thla  part  of  tha  raaaarch  affort  ara  to 


produca  a  solution  procadura  In  tha  fora  of  a  coaputar  program 


for  a  ganaralizad  staady  stata  naar  plata  wake  flow  problaa. 


Tha  rasulta  Mill  provlda  nan  naar  wake  flow  solutions  for 


steady  flow  as  wall  as  a  basis  for  stability  analysis  of  tha 


naar  plata  waka  region.  Tha  general lzatlon  will  relax  tha 


assumptions  of  Kovltz  CIS!  that  the  fraastraam  velocities  of 


tha  two  streams  ara  equal,  and  that  tha  density-viscosity  prod¬ 


uct  is  constant. 


¥ 


MATHEMATICAL  FORMULATION 


Problem  Definition  and  Method  of  Antlvlt 

The  near  wake  rag ion  of  a  splitter  plata  is  const darad  as 
shown  Is  figure  1.  Tha  subscript  1  refers  to  the  upper  half 
plana,  while  2  refers  to  tha  lower  half  plana.  U*  and  Uz  are 
tha  free-stream  velocities.  Blasius  profiles  are  assumed  at  tha 
coordinate  origin  at  tha  trailing  edge  of  tha  plata.  Tha  tem¬ 
perature  profiles  are  taken  to  be  uniform  at  the  origin.  For 
definiteness  U,  is  taken  to  be  greater  than  or  equal  to  Uz  and 
Tz  is  taken  to  be  greater  than  or  equal  to  T».  The  methods  of 
analysis  of  Goldstein  C123  and  subsequently  Kovltz  C133  are 
applied  to  the  governing  equations.  In  this  approach  a  Howarth 
transf or mat ion  is  applied  to  tha  governing  equations  which 
yields  an  lncompressibls  form  of  the  continuity  equation.  The 
additional  assumption  of  constant  density-viscosity  product, 
not  applied  here,  yields  an  incompressible  momentum  equation 
and  decouples  momentum  and  energy  equations.  This  study  does 
not  make  this  constant  property  assumption  and  consequently 
leaves  the  momentum  and  energy  equations  coupled.  The  equations 
are  nondimenslonal ized  in  the  same  way  as  Kovitz  C 1 33  so  that 
the  base  solution  can  be  compared  with  his  to  partially  verify 
the  computer  program.  Although  the  flow  is  not  self  similar,  a 
similarity  type  transf ormation  is  preformed  to  reduce  the 
dependence  of  the  y-profiles  on  the  streamwise  position  and  to 
put  the  equations  in  a  form  that  can  be  easily  matched  to  Bla¬ 
sius  profiles  at  the  origin.  A  series  solution  in  terms  of 


JO.* 


streamwlae  coordinate  and  function*  of  tha  croaa-atream  coordi- 


nata  ia  than  aaaumed.  Subatitution  into  tha  govarnlng  aquation* 
yialda  a  aaquanca  of  ayatama  of  ordinary  diffarantlal  aqua¬ 
tion*,  aach  of  Mhich  ia  ralativaly  aimpla  to  aolva  nuaarically 
from  aolutlona  of  tha  ayatama  of  lower  ordar. 


Assurr.pt  i  ons 


Tha  aaaumptlon*  ara  aimilar  to  thoaa  of  Kovltz  C133,  with 
tha  exception  of  thoaa  alraady  notad  and  tha  condition  of  no 
chamical  raactlon.  Thaaa  aaaumptlon*  ara  alao  conalatant  with 
thoaa  fraquantly  uaad  in  atabllity  analyala  of  aimilar  typa*  of 
flow*  C151. 

a.  Tha  flow  ia  aaaumad  to  ba  2-di manai onal ,  initially 
laminar,  and  govarnad  by  boundary  layar  typa  aquationa. 

b.  Thara  ara  no  external  or  body  forcaa. 

c.  Tha  maan  praaaura  la  conatant. 

d.  Thara  ia  no  chamical  raactlon. 

a.  Stoka'a  hypothaal*  holdai  bulk  vlacoalty  ■  -2*/3 

f.  Tha  fluid  la  a  parfact  gaa. 


Govarnlng  Equation* 


For  convanianca  tha  flowflald  la  divldad  into  an  uppar  and 
a  lowar  half  plana,  and  govarnlng  aquationa  ara  formulated  for 
aach  half  plana.  To  economize  on  notation  and  praaantatlon  of 


aquationa,  only  aquationa  for  the  uppar  half  plana  ara  given 
aince  thoaa  for  tha  lowar  half  plane  ara  exactly  tha  earn*  if 
tha  y-coordinate  for  tha  lowar  half  plana  ia  taken  to  ba  poin- 
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ting  downward.  Other  notation  includes  a  A  appearing  over  var¬ 
iable*  to  denote  a  physical  plane  variable,  a  ^  to  denote  a 
Howarth  transformed  variable,  and  no  over  symbol  to  denote  a 


nondlmensional ized  transformed  variable.  A  coordinate  subscript 
denotes  differentiation  with  respect  to  that  coordinate,  and  a 


prime  denotes  differentiation  with  respect  to  4. 

Under  the  assumptions  given,  the  governing  equations  arei 
♦  <>v>$.  -  0 
>uui  +Jvuj  -  <iu$>C, 


(uTi,  +vTp>  -  <  ATy)  i  -  0 

A  a  A 

P-jRT 


The  Howarth  Transform  1st 


•V  /\ 

X  •  X  , 


*  -V 

U  ■  Uf 


y  -  I  ><x,y)/p»  dy 


v  ■  *4/1 i(v  -  u  »y/Jx> 


Applying  the  transform  yleldsi 


US  +  Vy  ■  O 


UU2  ♦  VUy  Uy ) V 

UTr  ♦  vfy  -  1/<J,C„>  T£>  y 

v  ^  V 

P-pRT 


Nondlmensional iz at ion 


The  following  nondlmensional  variables  are  deflnedi 


x  -  x/<4L> , 
u  ■  u/Ui , 


y  -  -fR  y/(4L> 
v  -  v/U* 


•  -  T/Ta, 

y . 

p  ■ 


R  -  4j,U,L/x. 


«  ■ 

C.  -  Cp/C.1 


30.11 


-  •  -  •  V "  \  \  , 

"  ■*  -  **■  •?  -  % .  •  .  - 


■.•  V- 


«'>*»•** »  »*■< 


Substituting  these  definitions  Into  ths  Howarth  trsnsforssd 
equations  ylsldsi 


$ 


r, 

i" 

* 

K- 

s 


U»  ♦  Vv  ■  0 

uUn  ♦  vuv  ■  <  pa  uv)v 

U#»  ♦  V«v  ■  1  /  iCmPr-  )  (  0k  #v>v 

P*ft-r/#,  Mhtrs  At  ■  Ti/Ta 
Now  consider  the  stress  function  defined  byi 
Vv  ■  u,  end  -  I.  ■  v 

Assume  thst  this  strsss  function  can  be  written  In  the  f 
*  .  £—  »£<£,*)  then  u  •  £f  /3 


or  mi 


r.V. 


tr 

C* 

f 


I 

E 

‘ 


where 

£  m  H*'m,  and  ^  <■  yx_1""/m 
Matching  Blaslus  profiles  at  ths  origin  requires  that  m*»3. 
Transforming  to  <*,£>  coordinates  and  substituting  the  stream 
function  into  the  governing  equations  satisfies  the  continuity 
equation  Identically  and  yields  the  following  momentum  and 
energy  equatlonsi 

<p*f'*>'  +  2ff"  -  f'«  -  €(f'»fVj£  -  f"jf/j£) 

<pA«'>'  ♦  2f  •  *  -U/P-»c„>  €<f  *  »•/»€  -  f'Jf/J  £) 

For  large  £,  these  equations  could  be  solved  numerically  using 
free-stream  values  of  the  upper  and  lower  streams  as  boundary 
conditions  and  continuity  of  variables  and  their  gradients  at 
the  centerline  as  Junction  conditions.  However,  a  solution  for 
small  £  Is  sought  here  which  requires  matching  the  Blaslus 
velocity  profiles  as  £  — >  0  and  n  — >  m  for  small  constant  y. 
To  find  a  small  £  solution,  expand  the  dependent  variables  In 
series  about  €  ■  Oi 
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/-Vs-] 

■’•V" 


Ir.nsj 


•\V.j 


f<H,€>  -  E  £Jfj<t>, 


•  U,c> 


E  £-••.,<*) 


To  handle  prop  or ty  variation,  approx laata  data  4 or  pm  and  pk  aa 
third  daoraa  polynomial  si 

Pm  -  E  a  j  •-* ,  pk  •  Z  «j»J 

J  — o  J  — o 

Using  tha  axpanalon  of  •,  wrltai 

•a  “  DC  j  € J ,  xhara  Co  ■  #3, 

Ci  *  2 loli , 

C>  •  2«o«a+«?, 

Ca  m  2lol3^ii la,  ••• 

Is  -  EDj€j,  where  Do  ■  #3, 

Di  -  3f3#i, 

Da  "  3#3#a+3#o#f , 

Da  ■  3l8l*+6loli  la+H  i  ... 

Substitution  of  thasa  sarlas  into  tha  polynomial  approximations 
for  pm  and  pk  yialdsi 

Pm  m  E  Ej €J ,  pk  <*  E  Fj£^ 

where i 

Eo  ■  a0+a i lo^iaCo+iiDo 

Ej  -  a.Ij+aaCj+aiDj  for  J  >  0 

Eo  ■  Sotti lo+SaCo+asDo 

Fj  ■  a>  fj-t-SaC j-t-oaD j  for  J  >  0 

81nca  cB  variation  is  small  comparad  to  othar  paramatars  and 

doas  not  affact  tha  zaro  ordar  systam,  cP  is  takan  to  ba 

constant  and  aqual  to  its  maan  valua  over  tha  temperature 

interval.  Normalized  by  tha  fraa-stream  valua  of  tha  upper 

stream,  this  valua  is  slightly  greater  than  one.  To  simplify 

tha  aquations  of  higher  ordar,  tha  product  Pr-icp,  which  is 

close  to  one  for  air  in  tha  range  300-1200K,  is  takan  to  ba 

one.  Substitution  of  tha  sarlas  into  tha  momentue  and  energy 

equations  yields  aquations  of  the  formi 
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81nca  €  Is  arbitrary,  0j  ■  0  and  H.,  »  0  'for  all  J,  which  ylalda 
tha  following  aata  of  aquation*  (nonhomogenaous  tarma  hava  baan 
movad  to  tha  right  hand  sida)i 


Ordar 


Momentum  Equatlonai 


’  ♦  (2f o  +  Ei>  f i  '  -  <f  o)  1 


’  ♦  <  2f  o+Eo  >f»  ' -3f if i  ■♦■Sf  i'f  i  -  -€  t  f  o '  ' -Eif i  ' 


♦  (2f o^£o) fa  * “4f of a^ff o  #  f a  • 


♦<2fo+Ei>fi'-3fifif3fi'f.  - 


-E.fi' '-Eif i ' 
-E.fi' '-Eif i ' 
-3f.fi '♦(f i>* 

HE.fi'  '-Eifi' 
-E.fi' '-Eifi ' 
-E.fi' '-Eifi' 
-3f.fi '-4f ,f i 
♦3f i f i 


Ordar 


Enargy  Equatlonai 


Hj  -  0 


F  o  lo  "  ♦  (  2f  o+F i  )  li 


Fo#i  +<2fo+Fi>#i-  fi».  -  -F.»i-(Fi+3f .>»i 

Fo#i ' ♦  (2f  o+Fi)  »i-2f  i#.  -  -F,#i '-<Fi+3f  ,)  ti-t-f  i  #, 

— F,#i '-(Fi+4f.) *i 

Foti  ' ♦  <2f  o+Fi)  ti— 3f  i®.  •  -F.»i'-(Fi+3f  ,)  fi-*-2f  i  •. 

"F.l.  — (Fi+4f.)0»+  fjli 

— F.#i ' — (Fi+3f .> *i 


With  propar  boundary  and  Junction  condltiona,  thaaa  coup lad 
palra  of  ordinary  dlffarantlal  aquations  can  bo  aolvod  numorl- 
cally  for  aach  ordar  in  succosaion  boginning  with  ordar  xoro. 


Boundary  and  Junction  Conditions 


To  discus  Junction  conditions,  uppar  and  lowar  straan 
variables  must  ba  distinguished  even  though  tha  aquations  are 


the  same.  Therefore  lrnar  atraaa  varlablas  Mill  ba  Identified 


Mlth  an  overbar  In  tha  dlacuaalon  to  follow.  A  primary  otojec- 
tlva  of  this  part  of  tha  raaaarch  la  to  find  steady  state  solu 
tlons  to  bo  used  as  a  basis  for  analysing  tha  stability  of  tha 
Interface  between  tha  two  streams  In  Part  II.  Because  the 
Interface  occurs  at  y«0,  solutions  for  saall  y  are  sought, 
which  match  tha  Blaalus  velocity  profiles  at  trailing  edge  of 
the  plata  as  x  approaches  sero. 

Boundary  Conditions  to  Hatch  Blaslus  Velocity  Profiles  at  x-0 

Tha  Blaslus  velocity  profile  at  x *0  Is  given  by  C123i 
uo  ■  a,y  ♦  a^y“  ♦  a^y*  ♦  ... 

where 

a>  “  a/2,  a«  “  -0.3a*/4‘,  m-r  m  3.5 0^/7!,  ... 
and  a  *  1 . 32824 

The  limiting  process  to  match  the  Blaslus  velocity  profile 

allows  x"€s  to  approach  sero  while  holding  y«3£n  constant  at 

some  small  value.  With  u«£f  ' /3*E£-»'*'*f  J/3,  the  limit  u — >Uo  as 

x — >0  and  y"constant  Is  equivalent  toi 

limit  E€Jf -  E€j«j3j-1h-», 

H — >• 

€H«const. 

Matching  powers  of  £  In  the  limit  requires  thati 

limit  fj _i/nJ  •  3J-‘aj 
H~  >» 

in  particular  as  ^ — >w  i 

fo/^  — >  5.97708,  fl/t*  — >  0 

fi/*  — >  0,  fi/t*  — >  -8.93136 


The  upper  and  lower  stream  velocity  profiles  at  x»0  are  related 


Uo(|y|)/U»  m  uo(|y|)/Us  or  uo  ■  u0/fi~ 


where i 


A~  -  U»/Ua 


Consequently ,  the  boundary  conditions  for  the  1 owir  stream 


becomes 


limit  f  j-i/n*  -  3-»*‘aj/As, 

4 —  >«o 


in  particular  as  n — >«  i 


f6/*  — >  5. 97700/ fiv i  fi/H*  — >  0 


fi/*  — >  0, 


fi/V*  — >  -a. 93 136/ iL, 


Bacausa  tha  ini at  tamparatura  la  taken  to  ba  uniform  in  each 


straam  in  this  study,  tha  boundary  conditions  for  Aj  and  Aj  ara 


simply i 


•o  — >  A-r,  Ao  — >  1,  as  H  — > 


•  j  — >  0,  6j  — >  0,  as  it  — >  oo 


Junction  Conditions  at  tha  Interface  Between  tha  8traams 


Ths  junction  conditions  ara  derivsd  from  tha  continuity  of 


itraomlinai,  valocity,  shaar  strass,  tamparatura,  and  tampara¬ 


tura  gradient  at  tha  interface  between  the  two  streams. 


Without  loss  of  generality,  taka  f(0,0>«0,  assigning  tho 


dividing  streamline  tha  value  0.  Continuity  of  streamlines 


requires  that  f  j  (0)  «f  .>  <0)  ,  and  thareforei 


f(0,0)  -  fo<0>  -  fo(0)  -  0 


To  obtain  sufficient  conditions  to  solve  the  systems  of  order 


J >0,  assume  that  tha  deviation  of  tha  zero  streamline  from  tha 


C-axls  is  negligibly  small  for  small  £.  According  to  Crane 


£163,  relaxing  this  assumption  requires  taking  into  consider- 
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at  ion  tarni  In  th#  Navlar  Stokes  aquations  which  wars  neglected 


undar  tha  boundary  layar  f 1 ow  assumption.  This  small  deviation 


assumption  Is  adequate  for  stability  analysis  and  to  determine 


initial  growth  rata  of  disturbances,  but  would  not  be  adequate 


to  follow  long  term  evolution  of  disturbances  Into  large  rolled 


up  vortices  in  the  downstream  of  the  flow.  Using  this  assump¬ 


tion  yieldsi 


f  j (0)  -  f j  <0)  -  0, 


for  j  >  1 


Continuity  of  velocity,  u«u  at  ,  yieldsi 


f ' <€,0>  -  f • ( € , 0> 


and  so  fj<0>  -  fj(0) 


for  all  j 


The  choice  of  lower  stream  i\  coordinate  as  positive  downward 


requires  that  gradients  match  in  magnitude  but  have  opposite 


sign  at  n-0-  Continuity  of  shear  stress  yields  thereforei 


f ' ' <€,0>  -  -f  "  <£,0> 


and  so  fj'<0>  ■  -fj'(0) 


for  all  J 


Similarly,  continuity  of  temperature  and  temperature  gradient 


at  n*0  yieldsi 


tj<0)  -  •jiO) 


•  i  <0>  -  -«j (0) 


for  all  J 
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NUMERICAL  METHOD 


In  the  previous  ■action,  tha  problem  mas  formulated  aa  a 
•aquanca  of  systems  of  ordinary  diffarantlal  aquations,  aach 
ayataa  containing  four  aquatlona.  Bacauaa  thaaa  ayatama  ara 
not  initial  valua  problem#,  atralght  forward  numerical  integra¬ 
tion  to  obtain  a  solution  ia  not  possible,  and  Iterative  tech¬ 
niques  must  ba  uaad.  Two  auch  tachnlquaa,  tha  Bhootlng  Method, 
and  the  Integral  Method  ware  considered,  and  a  hybrid  combina¬ 
tion  of  the  two  was  implemented  for  solution  of  tha  zero  order 
ayatam.  Tha  shooting  method  la  discussed  in  moat  textbooks  on 
numerical  analyaiai  it  generally  converges  rapidly  once  the 
guessed  parameters  at  the  initial  point  are  sufficiently  close 
to  the  solution.  In  this  problem  the  obvious  candidate  for  the 
initial  point  is  the  Interface  between  the  two  streams  with  the 
guessed  parameters  being  the  Junction  values  of  the  variables. 
The  presence  of  four  unknown  parameters  (f o,f o ' , Go, *o>  at 
the  initial  point  (i\»0)  makes  successful  implementation  of  a 
■hooting  method  a  very  difficult  task.  The  Integral  method  has 
been  successfully  used  by  Mlnkowlcz  to  obtain  solutions  to  a 
variety  of  boundary  layer  problems  where  application  of  other 
methods  would  have  been  very  difficult,  see  for  example  C17J. 
The  integral  method  converts  the  system  of  differential  equa¬ 
tions  into  integral  equations  and  proceeds  by  iteratively 
Improving  guesses  of  the  unknown  functions  over  the  problem 
Interval  through  successive  numerical  evaluation  of  the  inte¬ 
grals.  When  under-rel axatlon  is  used,  this  method  is  not  nearly 
as  sensitive  to  the  initial  guess  as  the  shooting  method.  Eval- 


■a 


uation  uation  of  Junction  parame ters  for  the  momentum  equations 
proved  to  be  a  problaa  with  the  integral  method  because  differ¬ 
ences  of  large  nearly  equal  numbers  w ere  Involved,  which 
resulted  in  unacceptable  loss  of  computational  significance.  As 
a  result  of  these  difficulties,  a  hybrid  algorithm  using  the 
shooting  method  to  solve  the  momentum  equations  and  the  inte¬ 
gral  method  to  solve  the  energy  equations  was  developed. 
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Shooting  Algorithm  for  Momentum  Equations 


The  momentum  aquations  are  coupled  to  the  energy  equations 
via  the  functions  E, ,  E» ,  and  their  derivatives  appearing  in 
the  coefficients  of  the  momentum  equations.  During  one  overall 
iteration,  these  functions  are  computed  from  the  latest  tenta¬ 
tive  solution  of  the  energy  equations  and  held  constant  during 
solution  of  the  momentum  equations. 

For  computational  convenience  in  the  solution  of  the  zero 
order  system,  fe*  '  (0)  is  taken  as  given  Instead  of  the  parameter 
ft~.  This  approach  further  reduces  the  shooting  method  to  one 
with  only  one  unknown  quantity  at  the  initial  point.  The  value 
of  is  then  computed  from  the  converged  solution.  This  method 
will  not  work  for  solution  of  the  higher  order  systems,  how¬ 
ever,  because  the  value  of  flu,  is  fixed  by  the  solution  of  the 
zero  order  system.  The  higher  order  systems  require  the  use  of 
a  two  parameter  shooting  method. 

The  shooting  method  uses  a  Rungs  Kutta  algorithm  to  com¬ 
pute  the  functions  fo,  fo,  and  fo'  over  the  Interval  (0,«o)  , 
starting  at  n«0,  using  the  differential  equation,  the  known 
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practice,  computation  atopa  at  bom  finite  which  la  suffi- 

ciently  large  ao  that  functions  have  reached  their  aaymptotlc 
behavior  to  within  a  deal  red  tolerance.  •  4  mb  *ound  to  be 

sufficiently  large  In  thia  study.  The  known  boundary  value  at 
the  end  of  the  Interval,  ^«co,  la  then  compared  with  the  com¬ 
puted  result  and  used  to  compute  an  Improved  guess  of  fo(0>  as 
f ol lowsi 

Let  a  ■  current  guess  of  fo(0> 

s~  “  value  of  a  from  previous  iteration 

s~  “  improved  a  computed  from  current 
iteration  results 

Treat  fo'(«)  as  a  function  of  a,  them 

fo '  (co,s~>  ■  fo'(so,a)  ♦  }f o * /}a (a*-a>  ■  a 
where  a  -  3. 97708 
Estimate  the  partial  derivative  aai 

b  -  Cfo'  (*,B)-fo‘  <oa,s->  D/Cs-s-3  -  Jfo'/Js 
8olve  the  Taylor  expansion  for  s'"  givlngi 
a*  ■  a  -  Cfo  '  (oo,a)  — a3/b 

Using  the  iteration  formula  above,  Iteration  continues  until i 
(a--a)/a  <  10-" 

Upon  convergence  profiles  for  the  upper  stream  are  known  along 
with  the  values  at  i\»0,  therefore,  the  Runge  Kutta  algorithm 
can  be  used  to  compute  the  profiles  over  the  lower  stream.  The 
results  of  the  lower  stream  computation  are  then  used  to  com¬ 
pute  flv  according  toi 


Integral  Method  for  Entrav  Equations 


This  section  will  present  the  integral  equations  for  the 
zero  order  energy  equations.  Derivation  of  the  method  for 
higher  orders  is  similar. 

To  simplify  notation,  definet 


Rtt 

■ 

<2fo  ♦  Fo> /Fo, 

R*  ■ 

<2fo  ♦  Fo 

)/F, 

At 

At 

A< 

t> 

■  expC  — 1  R«(s> 

ds3,  4<t> 

■  expC  - 

1  R 

10 

AO 

At 

At. 

Z  ( 

t> 

■  I  A(t)  dt. 

Id,) 

-  1  A«t> 

dt 

AO 

AO 

The  zero  order  energy  equations  can  be  converted  into  the  fol¬ 
lowing  integral  equationsi 
•o(*>  -  «o<0>A<t> 

Tod,)  -  -To<0>7<*> 

•o<t>  -  «o<0)  ♦  Ao(0)Z<t> 

70<t>  -  to(o)  -  Ti<o)T<t> 

Application  of  boundary  and  junction  conditions  leads  toi 
•o(0)  -  CA-r-13/CI  (a)-t-T(m)  3 
•o(0)  -  Cl  3/CI  <»>  ♦!*<•>  3 


The  integral  method  computation  proceeds  as  follows* 

1.  Guess  to,  l0|  lo,  and  to  for  ,  •  i  to  a 

2.  Use  current  guesses  of  to,  to,  to,  and  to  to  compute 
Fo,  Fo,  Fo,  and  Fo  over  the  interval. 

3.  Use  results  of  step  2  and  current  tentative  solution  of 
momentum  equations  to  compute  R«  and  R*. 

4.  Using  numerical  integration  by  trapezoidal  rule  compute 
At  At  It  end  Z . 
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5.  From  the  valun  of  S  and  I  at  tha  and  of  tho  intarval 
compute  •o<0)  and  •o(O). 

6.  Uaa  r vaults  of  atop  4  and  S  to  compute  new  profiles  of 
•o<q>,  *o<^) ,  #o<*>,  and  •o(*>  over  the  domain. 

7.  If  iteration  has  not  converged*  go  to  step  2. 


Hybrid  Algorithm  for  Zero  Order  System 


The  hybrid  algorithm  uses  the  shooting  method  to  solve  the 
momentum  equations  and  the  integral  method  to  solve  the  energy 
equations  in  succession,  repeating  the  process  until  convert 
genes  of  the  entire  coupled  system  is  obtained.  A  Fortran  pro¬ 
gram  implementing  this  algorithm  is  listed  in  the  appendix.  Tha 
results  of  a  computation  can  be  saved  on  disk  for  later  input 
as  known  coefficient  functions  in  a  program  which  solves  the 
equations  which  arise  in  stability  analysis  of  the  flow. 

The  program  is  written  in  Microsoft  Fortran  for  an  IBM  PC 
or  compatible  computer.  The  universality  of  Fortran  however 
allows  uploading  to  a  mainframe  computer  with  minor  modifica¬ 
tions  in  print  snd  disk  storage  routines. 


■> 
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RESULTS  AND  DISCUSSION 


A  central  issue  in  this  research  Is  Mhether  or  not  prop¬ 
erty  variation  within  the  flowfield  has  a  significant  affect  on 
flow  dynamics  which  might  also  affect  the  stability  of  the 
flow.  If  the  pm  constant  assumption  is  valid  for  flows  with  a 
large  temperature  gradient,  then  the  momentum  equation  can  be 
decoupled  from  the  energy  equation,  and  temperature  variations 
within  the  flow  would  havs  negligible  effects  on  the  dynamics 
of  the  flow.  This  proposition  would  mean  that  a  flow  with  com¬ 
bustion  would  be  dynamically  equivalent  to  some  isothermal 
flow.  Figure  12  shows  ths  normalized  density  viscosity  product 
versus  normalized  temperature  for  air  at  atmospheric  pressure 
in  the  range  300K  to  1200K.  Assuming  pm  constant  approximates 
these  curves  as  a  constant  one.  From  the  degree  of  variation 

shown  in  figure  12,  a  property  variation  effect  on  the  flow 

would  appear  to  be  expected.  Such  an  effect  would  mean  that  a 
flow  with  combustion  fed  with  a  cold  air  stream  is  fundamen¬ 
tally  different  from  any  isothermal  flow  no  matter  how  inlet 

velocities,  etc.  are  adjusted  to  achieve  Reynolds  number  simi¬ 
larity  between  the  cold  and  combusting  flows.  The  computer  pro¬ 
gram  developed  here  solves  only  the  zero  order  system  of  equa¬ 
tions  for  the  flowfield  variables.  The  solution  does,  however, 
give  the  leading  term  in  the  series  expansion  of  these  vari¬ 
ables,  and  is  sufficient  to  investigate  the  main  effects  of 
property  variation  in  a  steady  flow. 

The  zero  order  system  of  equations  was  solved  for  a  vari¬ 
ety  of  flow  conditions  using  the  program  listed  in  the  appen- 
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dix.  Run*  for  isothermal  flow  (T»/T»  ■  1)  with  a  symmetric  make 
(U. /Ua  ■  1)  were  made  and  compared  with  tha  raaulta  of  Bold- 
atain  C123,  which  wara  re-computed  to  more  significant  figuraa 
and  tabulated  by  Kovitz  C133,  verifying  tha  prograaa  capability 
to  solve  tha  momentum  aquations  against  a  known  solution. 

Runs  wara  subsaquantly  made  for  temperature  ratios,  T»/T», 
of  1,  .3,  and  .23.  For  computational  convenience  these  runs 
ware  made  holding  f6'(0)  constant  at  2.  fo'(0)  is  propor¬ 

tional  to  tha  leading  term  of  the  shear  stress  along  the  cen¬ 
terline,  and  therefore,  these  runs  represent  flows  with  an 
approximately  constant  centerline  shear  stress.  Results  are 
shown  platted  in  figures  2-6.  These  plots  show  profiles  for  the 
leading  term  of  the  stream  function,  u  velocity,  u  velocity 
gradient  in  q  direction,  temper atura,  and  temperature  gradient 
over  both  the  upper  and  lower  streams.  For  clarity,  the  lower 
stream  variables  are  plotted  in  terms  of  the  upper  stream 
Independent  variable 

If  property  variation  had  negligible  effect  on  flow 
dynamics,  figures  2-4  would  show  no  variation  as  the  tempera¬ 
ture  ratio  decreased.  However,  these  figures  do  show  signifi¬ 
cant  changes  in  the  steady  flow  of  the  hot  stream  as  the  tem¬ 
perature  of  the  hot  fluid  is  doubled  (green  lines)  and  then 
quadrupled  (red  lines)  as  compared  to  the  free  stream  value  of 
the  upper  stream.  As  the  temperature  of  the  lower  stream 
increases,  the  velocity  profiles  become  steeper,  which  meane 
that  the  stress  in  the  hot  etream  increases  in  magnitude.  81 nee 
both  streams  are  transporting  momentum  into  the  wake  toward  the 
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velocity  minimum,  there  is  a  layer  across  which  ths  strsss 
rsvsrsas  sign  (figure  4).  As  temperature  incraasss  in  ths  lower 
stream,  this  laysr  becomes  thinner  and  the  stress  difference 
across  it  increases.  Whether  these  differences  would  have  a 
stabilising  or  unstabilizing  on  the  flow  is  not  known. 

Temperature  profiles  are  shown  in  figure  5.  These  profiles 
show  a  smooth  transition  from  the  free-stream  value  of  the 
upper  stream  to  that  of  the  lower  stream  as  expected.  They 
converge  to  one  as  * — >  <-w>  because  the  temperatures  are 
normalized  by  the  free-stream  value  of  the  hot  lower  stream. 
Figure  6  shows  temperature  gradient  profiles.  These  are  always 
negative  because  the  lower  stream  was  chosen  to  be  the  hot 
stream,  and  so  temperature  decreases  as  *  increases.  These 
plots  also  show  that  as  the  temperature  difference  across  the 
streams  increases,  the  profiles  steepen,  while  the  thickness  of 
the  thermal  layer  across  which  the  change  occurs  remains  the 
same.  This  behavior  is  due  to  the  step  nature  of  the  inlet  tem¬ 
perature  profiles. 

Numerous  computer  runs  were  also  made  for  Isothermal  but 
asymmetric  plate  wake  flows  with  varying  velocity  ratios.  The 
purpose  of  these  runs  was  to  study  the  steady  state  effects  of 
having  streams  of  unequal  velocities  interact  across  the  near 
plate  wake.  The  results  of  300  such  runs  were  collected  and  are 
shown  plotted  in  figures  7  to  10. 

Figure  7  shows  fo*(0),  which  is  proportional  to  the 
leading  tere  of  the  shear  stress,  versus  the  velocity  ratio.  As 
expected,  the  shear  increases  as  the  velocity  ratio  increases. 
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Tha  point  o f  Minimum  u  velocity  at  thm  roar  adga  of  tha 
plat*  muat  nova  from  tha  cantarlina  out  to  the  free-stream  of 
tha  slower  at ream  aa  tha  two  atraama  adjust  to  each  other  in 
tha  downatream  of  tha  wake.  Becauae  tha  lower  atraam  waa 
choaan  aa  tha  alowar  atraam,  tha  point  of  minimum  velocity 
therefore  occura  in  tha  lower  atraam.  Tha  poeltion  of  thia 
point  in  tarma  of  <x,y>  in  tha  near  wake  region  ia  actually 
governed  by  tha  need  to  match  tha  Blaaiua  prof ilea  of  tha 
incoming  atraama  which  determined  tha  definition  of  i(i 
*  -  y/ISx1'3) 

Tha  point  of  u  velocity  minimum  ia  determined  byi 
fo*  '  -  0 

Thia  point,  in  tarma  of  tha  n  coordinate,  ia  fixed  for  a  given 
velocity  ratio  lii/Ua,  and  repreeente  tha  depth  of  penetration 
of  tha  kinematic  affacte  of  tha  faater  upper  atraam  into  tha 
alowar  lower  atraam  by  tranaport  of  momentum  through  ahaar 
forcaa.  From  tha  aquation  relating  i\«  x,  and  yi 
y«tn  m  3n»tn  X1'3 

In  tarma  (x,y)  coordinates,  gives  tha  rata  at  which  tha 

point  of  zero  ahaar  movaa  into  tha  hot  stream  aa  x  la  lncraaaad 
from  taro  at  tha  trailing  edge  of  tha  plate. 

Figure  B  shows  tha  relation  between  and  velocity 

ratio.  Aa  velocity  ratio  increases,  ^»in  also  incraaaaa, 
meaning  that  at  fixed  x,  tha  point  of  zero  ahaar  movaa  deeper 
and  deeper  into  tha  hot  atraam.  This  shift  could  have  a 
significant  affect  on  the  stability  of  tha  flow,  and  might 
account  for  some  of  tha  stabilizing  affect  of  tha  hot  stream. 
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FI  gum  9  and  10  ahoa  tha  affact  of  valoclty  ratio  on  tha 
laading  tara  of  u  valoclty  at  tha  point  of  valoclty  ainlaua  and 


on  tha  cantarllna.  Aa  tha  valoclty  of  tha  loaar  atraaa  ralatlva 


to  tha  uppmr  atraaa  decraaaaa,  tha  u  valoclty  at  tha  valoclty 


ainlaua  alao  dacraaaaa  aa  axpactad.  Thia  affact  ia‘  laaa 


apparent  at  tha  cantarllna  Mhara  tranaf ar  of  aoaantua  froa  tha 


uppar  atr 


ilntali 


lighar  valoclty. 
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CONCLUSION 

Goldstein,  Chang,  Kovits,  and  Chiu* a  waka  aolutlona  war  a 
ax tan dad  to  tha  asymmetric  mlMing  of  two  streams  of  different 
valocity  with  praacribad  tamparatura  and  valoclty  ratio  at  tha 
trailing  adga  of  tha  plata.  Tha  pradlctad  waka  atructura  in  tha 
proM laity  of  tha  trailing  adga  ravaalad  moaantum  tranaport  froa 
faatar  to  alowar  atraan  which  ahifta  tha  point  of  minimum  valo¬ 
city  from  tha  cantar  of  tha  waka  into  tha  alowar  hot  atraaa. 

Remarkably,  tha  flow  configuration  naar  tha  trailing  adga 
haa  a  alow  apaad  rag ion  aandwichad  batwaan  tha  uppar  and  lowar 
ragions  which  both  hava  valocitlaa  hlghar  than  tha  cantral  alow 


apaad  ragion.  As  a  result,  flow  in  thia  region  ia  ax pact ad  to 
hava  a  propensity  to  double  aided  vortex  ahedding.  However, 
thia  dynamic  conf iguration  atarta  at  tha  trailing  adga  and  ter- 
mlnataa  at  tha  point  whan  tha  minimum  valoclty  in  tha  waka 
approachaa  tha  free  stream  valocity  of  the  slower  stream.  Thia 
dynamic  configuration  ia  a  unique  characterlatlc  of  the  trail¬ 
ing  adga  waka.  This  atructura  la  distinctly  different  from  a 
conventional  ahear  layer  without  a  minimum  valocity  point  in 
tha  layer.  This  two  aided  mixing  ragion  structure  is  conjec¬ 
tured  to  have  vortex  shedding  characteristics  which  are  sig¬ 


nificantly  different  from  a  conventional  single  aided  mixing 
layer.  These  and  other  aspects  will  be  studied  in  Part  IX  of 
tha  present  research  program. 


Effects  of  coupling  batwaan  energy  and  momentum  due  to 
property  variation  in  tha  presence  of  steep  tamparatura  gra¬ 
dients  ware  also  found  to  be  significant. 
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This  routine  lolvot  th«  taro  order  ayataa  o f  differential 
equation*  for  a  noneyaaetrlc  plate  wake  using  the  shooting 
eathod  with  a  Runge-Kutta  routine  for  the  aoeentue  equations 
and  the  integral  aethod  for  the  energy  equations. 
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(2f+E')f 1 

'  -  f  •  ■  0 
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F  «  ♦ <2f 

♦  F  ' )  • '  ■ 

0 

c 

c 

F  ♦  ♦  <2f 

♦  F  ' )  ?'  ■ 

0 

c 

c 

8.  C. si 

f(0)  ■  0, 

f  "  (•» 

«  9.97708 

c 

c 

f (0)  ■  0 , 

f  ' • (•) 

■  9. 97708/ <U1 /U2) 

c 

_ 

c 

f  * (0) -f ' <0)  ,  f • • (0) 

■  -f  ' '  (0) 

c 

c 

•(■1-71/T2 

c 

c 

•  <0> >• <0)  , 

•  ’  <0) 

■  -#'(0) 

c 

c 

Main  Variable  Assignoentsi 

c 

c 

f 

-  F0,  f 

-  FOB, 

f'  -  FOP, 

f  *  - 

F0PB, 

c 

_ 

c 

f  ■ 

F0PP,  f‘ 

'  -  F0PPB 

c 

c 

1 

-  TO,  i 

-  T0B, 

•  '  -  TOP, 

♦  - 

T0PB, 

c 

c 

E 

-  EV,  E 

-  EVB, 

E'  -  EVP, 

E  - 

EVPB, 

c 

c 

F 

-  ET,  F 

-  ETB, 

F-  -  ETP, 

F '  - 

ETPB, 

T1/T2  -  T1DT2 
U1/U2  -  U1DU2 

Inputsi  User  la  proapted  for  the  inputs,  which  are  entered  a* 
integers  or  floating  point  nuabere  with  deciaal  point 
separated  by  coaaae. 

1)  f  "  <0> 

2)  Sues*  for  f ' (0) . 

3)  Length  of  interval. 

4)  Step  eite  and  print  step  eite. 
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9)  Taaparatura  ratio  71/T2 


Outputai  Tht  prograa  prints  function  valuta 
and  alopaa  ovar  tha  intarval. 

Ui\U2 


Initialization  and  eollaction  of  inputs 


11 

B/{V 

13 

*  * 

P.v.; 

40 

60 

♦NOFLOATCALLS 

♦LARGE 

♦DEBUG 

IMPLICIT  REALMS  (A-H.O-Z) 
CHARACTER*64  FRAME 
CHARACTERalS  UPPER, LONER 
CHARACTERtlO  NAME 


DIMENSION  Y(3)  ,F<3> 

COMMON /VECTF/FO (801) , FOB (801 ) ,F0P (SOI ) , FOPB (B01 ) , 

1  FOPP (801 ) , FOPPB (801 ) , F8 (801 ) , FSB (802) , X (801) 

COMMON/ VECTT/ TO (801) , T0BI801) .TOP (801)  ,T0PB(601) , 

1  T8 (801 ) ,T88 (801 ) 

COHMON/EV/EV (1601 ) , E VB (1601) , EVP (1801) ,  EVP8<1601) 

COMMON /ET /ET (801) , ETB (001 ) , ETP (801 ) , ETPB (801 ) 

COMMON /PROP/ A VO, AVI ,AV2, AV3, AK0,AK1 , AK2, AK3 

COMMON/ P ARM /DX , I XE , IXE2, IP8, 1TMAX ,RF , T 1 DT2 , TOO , XL , 1FP , 

1  UPPER, LONER, U1DU2.U1DU28 

COMMON / P ARMS / Y0,YPPL,YP00 ,YP01 ,YPPO 
Raad  initial  valuaa,  guanas,  and  paraaatara. 

NRITE  <• , 1 ) 

FORMAT ( 10X , ' Ztro  Ordtr  Plats  Maks*//) 

NRITE  (*,3) 

FORMAT (IX ,  Entar  T1DT2I  ’\) 

READ (••60) T1DT2 
NR!TE(*,5) 

FORHATdOX,  'Entar  DDf  (0)1  '\> 

READ  (•  ,60) YPPO 
NRITE  <• , 7) 

FORHATdOX,  'Entar  guaaiaa  for  Df(0)i  *\) 

READ  <*,60>  YPOO, YP01 
NRITE(*,9) 

FORHATdOX, 'Entar  xli  *\) 

REAO (•  ,60)  XL 
NRITE (•, 1 1 ) 

F0RMAT(/10X, 'Entar  no. of  points  and  pointa/prlnti  ’\) 

READ  <»,40)  I  XE ,  IPS 
NRITE (• , 13) 

FORHATdOX, 'For  full  print  antar  1,  abbreviatad  print  antar  Oi  '  \) 
READ ( * , 40 ) IFP 
FORMAT (919) 

FORMAT (4F14. 9) 

Sat  constants 
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UPPER-'Upper  Half  Plan#' 

LONER- 'Loaer  Half  Plana' 

IXE2-2*IX£-1 

Y0-0. 

YPPL-3. 97700 
ITHAX-1000 
DX-XL/ ( I XE  —  1 » 

00  32  1-1, IXE 
X (I) ■( I-1 ) *DX 

RF  •  Relaxation  factor  uaad  In  taaparatura  ftald  coaputation 
RF-.3 

Sat  Initial  Suaaa  for  Taaparatura  Dapandant  Coaffieianta 

DO  70  1-1, IXE 
ET  < I ) -1 . 

ETP ( I ) -0. 

ETB ( I ) -1 , 

ETPB ( I ) -0. 

CONTINUE 
DO  72  I-l , I X E2 
EV  < I ) -1 . 

EVP(l)-0. 

EVB ( I ) -I . 

EVPB ( I ) -0. 

CONTINUE 

Initial  Suaaa  of  Cantarlina  Taap  Fn 
T00-<TlDT2M>/2 

Initialize  Coaffieianta  for  Property  Coaputation 
Taylor  8erlea  for  Noraaliiad  Denaity*Vlaeo«ity 


TVP- 
TH-  < 
BVO- 
BV1- 
BV2- 
8V3- 
AVO- 
AVI- 
AV2- 
AV3- 


T1DT2**. 3 

TlOT2*l>/2 

TVP/TH»*.3 

-.3*TVP/TH**1.3 

.  193*TVP/TN**2. 3 

-,097*TVP/TH**3.3/6 

0VO-TM» (8V1-TN#  <8V2-TH»0V3> ) 

8V1-TN*<2*BV2-3*BV3*TH> 

8V2-3*BV3*TH 

BV3 


Taylor  Serial  for  DenattyiConductl vlty 


TKP-T1DT2**.  19 

8K0-TKP/TN**. 19 

BK 1 - - . 19*TKP/TH**1 . 19 

BK2-  .  U303*TKP/TH**2. 19 

BK3--.0B232A3*TKP/TH#*3. 19 

AKO-BKO-TH* (BK1-TH*  <BK2-TH*8K3) ) 

AK1-8K1-TH*(2*0K2“3*BK3*TH) 
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AK2“BK2-3*8K3*TM 

AK3-BK3 

CALL  VELOCITY 
CALL  TEMP 

DO  BO  I«1,IXE 
FB(I)"FO<I) 

FSB ( I ) "FOB ( I ) 

Tsm-Tom 

TSB(I)-TOBU) 

CONTINUE 

U1DU2S-U1DU2 


Main  Iteration  Loop 

The  prograa  altarnataly  coaputaa  tha  valoeity  and  taaparatura 
Hold*  baginning  with  tha  valoeity  field.  Tha  valoeity  and 
taaparatura  fielda  ara  coaputad  itaratati valy  in  aubroutinaa. 

Bacauaa  F ' '  ( 0 )  ia  apedfied  for  eonvanianea  in  tha  coaputation, 
tha  valoeity  ratio  U1DU2  la  coaputad  froa  tha  raaulta. 

Ovarall  convergence  ia  checked  by  verifying  that  tha  aaxiaua 
atraaa  function  change  and  change  in  U1DU2  ia  below  a  preaat 
tolaranca  level  after  an  intarvaaning  taaparatura  coaputation, 
and  that  tha  aaxiaua  change  in  taaparatura  la  baloa  a  preaat 
tolaranca  after  an  intarvaaning  velocity  coaputation. 


00  200  IT-1, ITHAX 

CALL  VELOCITY 
CALL  TEMP 

CH6MX"DA8S  <U1DU2— U1DU28) 

DO  110  1-2 , IXE 
01-DABS(FO(I)“F8(I))/FO(I) 

D2-DABS (TO ( I ) -T8 ( I > ) /TO ( I ) 

D3-DABS (FOB ( I ) — FSB ( I ) ) /FOB  ( I ) 

D4— DABS ( TOB ( I ) — TSB  < I ) )  / TOB  ( I ) 

CH6MX*DMAX 1 (01,02,03,04, CHSMX ) 

F6<I>-F0<I) 

TS  < I ) —TO  < I > 

F8B ( I  > -FOB  <  1 1 
TSB ( I ) —TOB ( X  > 

CONTINUE 
U1DU28*U1DU2 
NRITE (*,  1201CH8MX 

FORMAT (/10X, '  *•#****#*§**  CHSMX" '  ,816.4,  '  tf**#**t*ttee ' / ) 

IFtCHSMX.LE. 10-7)80  TO  300 

CONTINUE 


Check  and  print  raaulta 


CALL  VPRINT < FO , 1 , IXE, 'FO 
CALL  VPRINT (FOB, 1 , IXE, 'FOB 
CALL  VPRINT (FOP, l , IXE, 'FOP 
CALL  VPRINT  (FOPB, l, IXE, ‘FOPB 
CALL  VPRINT (FOPP, 1 , IXE, 'FOPP 
CALL  VPRINT (FOPPB, 1 , HE, ‘FOPPB 
CALL  VPRINT (TO, 1 , 1X6, ' TO 
CALL  VPRINT (T08, 1 , IXE, 'TO B 
CALL  VPRINT (TOP, 1 , IXE, ‘TOP 
CALL  VPRINT (TOPB, 1 , IXE , 'TOPB 
MRITE ( • , SOS) U1DU2 
FORMAT  (/IX,  ' . U1DU2  ■ 


*  ,616.6, 


Write  Reaulta  on  Oitk 


WRITE  (*,3000) 

FORMAT (IX, 'Enter  1 
READ (*,3001) I  SAVE 
FORMAT (IS) 

IF  ( I  SAVE. NE. 0) THEN 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 
FNAME 
CALL 

ENOIF 

STOP 

END 


to  aava  reaulta  on  dieki  '\) 


■ ' Di N. 0 ' 

WDISMX,  FNAME, IXE) 

■ ' Ol FO. X ' 

N0I8MF0, FNAME, IXE) 

■ ' Ol FOP. X  ' 

HOISK(FOP, FNAME, IXE) 

■  ' Di FOPP. X  ' 

NDI6K(F0PP, FNAME, IXE) 

■  'DiFOB. X ' 

NO I 8K( FOB, FNAME, IXE) 

■  'Oi FOPB. X  ’ 

NO  ISM  FOPB,  FNAME,  IXE) 

•  'DiFOPPB.X ' 
NDIBMFOPPB, FNAME,  IXE) 
■'OiTO.X* 

M0I8MT0, FNAME,  IXE) 
■OiTOB.X' 

M0I6K (TOB, FNAME, IXE) 

■  'Ol TOP. X  ' 

WD18MT0P,  FNAME,  IXE) 

■  ' Di TOPB. X  ' 

ND18MT0PB,  FNAME,  IXE) 


Velocity  Oiatribution  Coaputation 


SUBROUTINE  VELOCITY 


IMPLICIT  REAL*S  (A-H.O-Z) 
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CHARACTER«44  FNAHE 
CHARACTERM8  UPPER, LONER 
CHARACTERtlO  NAME 
DIMENSION  Y (3)  ,F  (31 

COHHON/VECTF/FO (SOI ) , FOB (801 ), FOP (SOI ) ,  FOPS (801) , 
i  FOPP (SOI ) , FOPPB  <801 ) ,F8 (SOI ) , FSB (602) , X (SOI ) 

COMMON/EV/EV < 1401 > ,EVB< 1401) , EVP (1401) ,EVPB< 1601 > 
COMMON/PROP/ AVO,AV I ,AV2,AV3,AK0,AKt ,  AK2, AK3 
COMHON/PARM/DX , I XE, IXE2 , IPS , ITMAX ,RF, T1DT2,T00, XL , IFP, 

1  UPPER, LONER, UIDU2,U1DU2S 

COMMON /P ARMS /YO ,YPPL,YP00,YP01,YPP0 
C 

JX-1 

Yd) -YPPO 
Y(2)-YP00 

Y  <3>  -Y0 

CALL  RUN0EO (Y,JX,IXE,DX,X,FO,FOP , FOPP ,EV , EVP, 0) 

YPPLO-Y(t) 

NRITE  0,81) 

81  F0RMAT(/1X,  Velocity  Computation  Iteration'/) 

1-0 

NRITE(a,9O)I,YP00,YPPL0 

90  FORMAT ( 1 X , 14 , '  FPO- ' ,810. 12,  '  FPPL- ' ,81B. 12) 

C 

DO  300  I-l , ITMAX 
JX-1 

Y ( 1 ) -YPPO 
Y (2) -YP01 
Y (3) -YO 

CALL  RUNBEO (Y,JX, IXE, DX,X,FO, FOP, FOPP, EV, EVP, 0) 

YPPL1-Y ( 1 ) 

A-(YPPL1-YPPLO)/(YP01-YPOO) 

YPPL0-YPPL1 

YP00-YP01 

YPOl-YPOO- ( YPPL1-YPPL) /A 
ERR-DABS(  (YPPL-YPPLD/YPPL) 

NRITE(*,tOO)I,YPOO,YPPLO,ERR 

100  FORMAT ( 1 X , 14, '  FPO-’ ,818. 12,  '  FPPL- '  ,818. 12, '  ERR-', 812. 4) 
IF(ERR.LT. 10-0)90  TO  1000 
300  CONTINUE 
1000  FO ( 1 ) -YO 

FOP  < 1 ) -YPO 1 
FOPP ( 1 ) -YPPO 
JX-1 

Yd) -YPPO 
Y (2) -YPOl 
Y ( 3) -YO 

CALL  RUNBEO ( Y, JX, I XE , OX , X , FO , FOP, FOPP, EV, EVP, 1) 

IF (IFP. EQ. 1 ) CALL  PRINT ( X ,FO,FOP, FOPP, I XE, IPS, UPPER) 

C 

FOB( 1 ) -YO 
FOPS (1) -YPOl 
FOPPB  <1 ) -  -YPPO 
JX-1 

Y  ( 1) ■  -YPPO 
Y (2) -YPOl 


l 

$ 


I 
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Y  <3) -VO 

CALL  RUN8EO(V,JX,IXE,OX,X,FOB,FOP8,FOPPB,EVB,EVPB,l) 

IF ( IFP. EQ. 1 ) CALL  PRINT (X,FOB,FOPB,FOPPB, IXE, I  PS, LOWER) 
YPPL8*V<1) 

U1DU2-YPPL/YPPLB 
WRITE (*,  1300MJ1DU2 
1300  FORHAT(/lX,  U1DU2*  ‘,616.0/) 

RETURN 

END 

C  _ 

C 

C  Temperature  Distribution  Computation 

C  _  _  _ _  _ 

C 

SUBROUTINE  TEMP 

IMPLICIT  REAL*8  (A-H.O-Z) 

CHARACTERS64  FNAME 
CHARACTERslB  UPPER, LOWER 
CHARACTERMO  NAME 

DIMENSION  A ( BO  1 > , AB < 80 1  > 

DIMENSION  RT (801 ) ,RTB (801 ) 

DIMENSION  8ESRT <801) , 3E9RTB <801 > 

DIMENSION  8RT (801 ) , 8RTB  (801 ) 

COMMON/ VECTT/ TO (001 ) , TOB (801 1 , TOP (B01 ) , TOPB (B01 ) , 

1  TS(BOt) , TSB (801 ) 

COMMON /VECTF/FO (BO  1 ) , FOB (801 ) , FOP (801 ) ,FOPB (801 ) , 

1  FOPP (001 ) ,FOPPB (801 ) ,F8 (801 ) ,F8B (802) , X (801 ) 

COMMON/PARH/DX , IXE, IXE2, IPS, ITMAX ,RF,T1DT2,T00,XL,IFP, 
1  UPPER, LONER, U1DU2,U1DU23 

COHHON/EV/EV < 1601 > ,EVB< 1601) , EVP (1601) ,EVPB( 1601) 
COMMON/ ET /ET (801) ,ETB(B01) , ETP (801 ) , ETPB (801) 
COMHON/PROP/AVO , AV 1 ,AV2,AV3,AK0,AK1 ,AK2,AK3 
WRITE!*, 401) 

401  FORMAT (/IX, 'Ttapsraturt  Field  Ceeputatlon  Iteration’/) 
C 

DO  300  ITERT*1 , ITMAX 
DO  420  1*1  , IXE 
RT(I)«(2*F0(I)*ETP(I))/ET(I) 
RTB(I)*(2*F0B(I)*ETPB(1))/ETB(I) 

420  CONTINUE 
C 

IF ( IFP.EB. 1 ) THEN 

CALL  VPRINT(RT,1, IXE,  RT  ’> 

CALL  VPRINT (RTB, 1 , IXE,  'RTB  ‘) 

ENDIF 

C 

CALL  TRPINT (RT,8RT,  IXE,  1 ) 

CAL'  TRPINT (RTB.SRTB, IXE, 1) 

C 

C  AXE  ME 

C  Coaputa  8RT  -  |  RT  dX  ,  8RTB  *  I  RTB  dX 

C  10  10 

C 


DO  490  I-l.IXE 
A < I ) -OE*^  < -BRT ( I  > ) 

AB  ( I ! *OEXP (-8RTB  ( 1 ) ) 

CONTINUE 

CALL  THAI  NT (A,8ESAT, IXE,  1 ) 

CALL  TAP  I  NT (AB, BESRTB , I XE ,  1 ) 

Coaputa  nan  cantarlina  taaparatura. 

T00NEN«M8ESRT<IXE)*T1DT2*SE8RTB<IXE> ) / (BEBRT ( IXE) ♦8EBRTB ( IXE) > 
RDT00«0AB8 ( (TOONEN-TOO) /TOO) 

TOO"TOO  ♦  AF*  <  TOONEH- TOO ) 

TOPO* (TIDT2-I ) / (8E8RT (IXE) +SESRTB (IXE) ) 

Coaputa  nan  taaparatura  and  taaparatura  gradiant  profllei. 

00  470  I-l.IXE 
TO ( I) "T0P0*8E8RT ( I ) ♦TOO 
T08  ( I )  TOPO—SESRTB  ( I )  -a-TOO 
TOP ( I ) »TOPO*A  < I ) 

T0PBU)«-T0P0»ABU) 

CONTINUE 

IF  UFP,  EO.  1 )  THEN 

CALL  VPRINT (TO, 1 , IXE, 'TO  NEN  ') 

CALL  VPRINT (TOB,1,IX£,'TOB  NEN  > 

CALL  VPRINT (TOP, 1 , IXE,  TOP  NEN  ') 

CALL  VPRINT (TOPB. 1 . IXE, 'TOPB  NEN  ') 

ENOIF 

Racoaputa  proparty  dapandant  part  a f  coefficient  RT. 

00  472  I-l.IXE 

ET  (I)-AK0+T0(I)a(AKl+T0(I)a<AK2+T0(I)aAK3) > 

ET8  <  I  >  — AK0*T0B ( I ) *  < AK1*T0B ( I ) • (AK2*T08( I ) #AK3> > 

ETP ( I ) -TOP ( I >  a (AKl^TO ( I ) *  <2*AK2rT0 ( I ) #3#AK3> ) 

ETPB  <1 >  »T0P8 II >  * l AK 1 *TOB  U ) * <  2*AK2*T0I ( I >  #3*AK3) ) 

CONTINUE 

IF ( IFP.EO. 1)THEN 

CALL  VPRINT (ET, 1 , IXE,  'ET  NEN  ') 

CALL  VPRINT  <ET8 , 1 ,  IXE,  ET8  NEN  ') 

CALL  VPRINT (ETP, 1 , IXE, ’ETP  NEN  > 

CALL  VPRINT(ETPB,1,  IXE,  ETPB  NEN  ') 

ENOIF 

NRITE(*,4BO)ITERT,TOONEN,ROTOO 

FORMAT (9X , 14, '  TOONEN" ' ,818.9, '  ROTOO-' ,812.3) 

IF (RDTOO. LE. 10-8)80  TO  400 
CONTINUE 

Sat  raady  to  raturn  to  aoaantua  itaration  v 

Racoaputa  proparty  dapandant  part  of  coaffielenta 
for  aoaantua  equatlona 


30.51 


l 


flares*® 


i  nrngwfwrwywn 


LV’ 


Sfc 


600 


610 


620 

C 


C 

C 

C 

C. 

C 


00  610  1-1, 1XE 
J»2*I-1 

£V(J)aAV0+T0<I>*<AVl  +  T0(I) • ( AV2  +  T0  < I ) *  A V  3 )  > 

C V  B  <  J ) "AV0+T0B (I)#(AV1»T0B(I)*(AV2*T0B(I) *AV3> > 
EVP(J)»T0P(I)a(AVl*T0(I) • (2*AV2+T0 ( I ) *3*AV3) ) 

EVPI (J ) •TOPS  < 1 >  * (AVl^TOB  < I > • <2*AV2*T0B ( 1 ) *3*AV3> ) 
CONTINUE 

DO  620  1*2, IXE2-1 ,2 
EV(I>*(EVCI-1> ♦EV  C I ♦ 1 » >/2 
£VB(I)a(EVB(I-l)+EVB(!+l))/2 
EVP( l ) ■  (EVP ( X  —  1 ) *EWP  ( IM ) )  /  2 
EVPB ( I )"(EVPB ( 1-1 >  +EVPB  < l»l) > /2 
CONTINUE 


IPdPP.EOi  DTHEN 

CALL  VPRINT (EV , 1 , 1 X E  «  'EV  NEN 

call  vpr:nt<evb,i«ixe,'Evb  NEW 

CALL  VPRINT (EVP, 1 , IXE i ‘EVP  NEN 


' ) 


' ) 
■  > 


ENOIF 

RETURN 

ENO 


CALL  VPRINT (EVPB , 1 f IXE, 'EVPB  NEN 


Rung*  Kutta  Routina  to  Coaputa  fO,  f Ob  and  darivativaa 


SUBROUTINE  RUN8E0 < Y , JX , I XE , DX , X , YO , VOP , YOPP , EV ,EVP , IS) 
IMPLICIT  REALtB  (A-H.0-2) 

DIMENSION  Y ( 6 )  ,F (6 > , X (801 ) , VO (801 ) ,YOP (801 ) , YOPP (801 ) 
DIMENSION  EV ( 1 601 ) , EVP ( 1601 ) 

N-3 

DO  30  1-2, IXE 
DO  10  H-1,4 

CALL  RUN8E (N,Y,F,JX,DX,H) 

F  ( 1) ■ <- (2*V ( J) ♦EVP(JX) l  *Y ( l) *Y (2) *Y  <21 > /EV(JX) 

F (2) -Y  <  1 ) 

F  ( 3 )  -  Y  <  2 ) 

10  CONTINUE 

CALL  RUN8E  (N,Y,F,JX,DX,3) 

IFdS.EO.  DTHEN 
YOU )  «Y  (3) 

YOP ( I ) -Y (2) 

YOPP ( I ) «Y ( 1 ) 

END1F 
30  CONTINUE 
RETURN 
END 


Runga  Kutta  Hal*  8tap  Routina 


SUBROUTINE  RUN8E(N,Y,F,JX,DX,M) 
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>■ , 
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IMPLICIT  REAL*!  <A-H,0-1> 

DIMENSION  V (3) ,F<3> ,0(3) 

SO  TO  (I, *,5,3,7) ,H 
DO  2  1*1, N 
0(1)  •  0. 

A  ■  .3 
RETURN 

A  -  1 . 7071067811863*732*4 
JX  •  JX  ♦  1 
DO  A  1*1, N 

YU)  ■  YU)  *  A  *  ( F  ( I )  •  D  X  -  0(D) 

Q(I)  ■  2.*A«DX*FU>  ♦  <1.-3.*A)*QU> 
A  *  . 2*26932 IBS  134524756 
RETURN 
DO  8  I  ■  1  ,N 

Y(I)  ■  YU)  ♦  DX*F(I)/6.  -  OU)  /  3 . 
RETURN 
END 


Subroutine  for  local  integral  of  a  function 
using  tha  trapazoidal  ruls. 


Victor  containing  input  function 
Vector  containing  output  local  integral 
SFU)«  integral  froe  LL1M  to  IX. 

Nuaber  of  points,  including  end  points  in 
the  interval  for  Integration, 

Step  sizei  X  distance  between  points. 

-  F  index  for  lower  lieit  for  Integration 


SUBROUTINE  TRPINT(F,8F,NP,LLIH) 


IMPLICIT  REAL*S  (A-H.O-Z) 

CHARACTER* 1 B  UPPER, LONER 

COMMON/PARM/DX , IXE, IXE2, IPS, ITMAX ,RF,T1DT2, TOO, XL , IFP, 
1  UPPER, LONER, U10U2,U1DU2S 

DIMENSION  F (801) ,8F (801) 

SF(LLIH)»0. 

DO  100  l*LLIMM,LLIM*NP-l 

SFU)wSF(t-l>  ♦  DX«  (FII-11  ♦  F(I)  >/2. 

RETURN 

END 


Save  a  Vector  on  Disk 


SUBROUTINE  NDI8K (V,FILE, IMAX) 

IMPLICIT  REAL*8  (A-H.O-Z) 

CHARACTER***  FILE 
DIMENSION  V (801 ) 

OPEN  <6, FILE-FILE, STATUS*  NEN' , ACCESS* 'SEQUENT I AL ' ) 
NRITE (6,10) < V  < I ) ,1-1, IMAX  > 

FORMAT ( IX, FIS. 12) 
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St  V  1 


CLOSE (6) 

RETURN 

END 


Subroutine  to  do  tablo  output  to  printor 


SUBROUTINE  PRINT ( X ,8,8P ,SPP, IXE , IPS.REBION) 

IMPLICIT  REAL*8  (A-H.0-2) 

DIMENSION  X (801) ,8(801) , BP ( B01 ) , 8PP (001 > 

CHARACTER*^  RE8I0N 

NRITE(*,1) 

FORMAT ( IX , / 26 X Tebi •  of  Function  Values') 

WRITE  <*,3) RE8I0N 
FORMAT (28X ,A18, 

1//6X,  'K  •  ,20k,  'DDf ‘ ,17X,  Of  \13X, 'f  '/) 

WRITE (#,  1200) ( X  < I ) , 8PP ( I ) ,SP ( I ) ,0(1) ,1*1 , 1 XE-1 , IPS ) 
WRITE!*,  1200) X (IXE) ,0PP(IXE> ,BP(IXE) ,6(IXE) 

RETURN 

F0RMAT(1X,819.7,2X,619.12,2X,819. 12,2X,B19. 12) 

END 


Subroutino  to  do  vector  output  to  printer 


SUBROUTINE  VPRINT ( V , 10 , LP .NAME) 

IMPLICIT  R£AL*8  <A-H,0-Z> 

CHARACTER#iS  UPPER, LONER 

COMMON/ P ARM/0 X , IXE,IXE2,IPS,ITNAX,RF,T1DT2,T00,XL,IFP, 

1  UPPER, LONER, U1DU2,U1DU2S 

DIMENSION  V (801 ) 

CHARACTER# 1 0  NAME 
HRITE(#,9)NAHE 

FORMAT (/9X ,  '  VAR  I  ABLE  I  ',A12/) 

IX-IO 

IF ( I X. 6T, IXE) RETURN 

WRITE (*,90) (I  ,DX*(I  —  1) , NAME , V ( I ) ,I*IX,LP-1,IP8) 

IF (LP< EO. I X E > 80  TO  60 

WRITE  (*, 90)UP ,DX* (LP— 1 > , NAME , V (LP) 

RETURN 

NRITE(*,98)IXE,DX#(IXE-1) .NAME, V( IXE) 

RETURN 

FORMAT (AX , 'I*  ',I3,6X,'X>  ’ , SI  2 . 4 , 6X , AIO ,  ’  ■  ' ,  1 X , 622 . 1 «) 
FORMAT ( 4  X , 'IE  ',I3,6X,'E«  ' , 8 1 2 . 4 , 6X , A1 0 , ' ■  ' ,  1 X , 822. 1 ♦ ) 
END 
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ABSTRACT: 


The  objective  of  this  research  was  to  further  investigate  the  feasibil¬ 
ity  of  a  flexible  radiator  for  rejecting  large  quantities  of  waste  heat 
in  space.  An  experiment  designed  to  assess  the  potential  damages  caused 
by  microreteroids  was  carried  cut.  This  involved  piercing  differ er.* 
membrane  materials  with  various  needles  and  computing  corresponding  mass 
'cs  rate?  fur  two  cases.  In  cne  case  a  layer  of  condensate  covered  the 
remorane.  In  the  other  case,  the  test  section  was  filled  with  super¬ 
heated  steam  on’y.  From  the  data  obtained  it  is  concluded  that  mass 
loss  for  the  condensate  case  is  high,  but  not  critical.  It  is  believed 
that  gravity  may  account  for  a  large  percentage  of  this  high  mass  loss 
rate.  For  the  superheated  steam  case,  mass  loss  is  very  low  and  would 
ret  significantly  effect  radiator  performance.  Considering  the 
radiator's  intended  operation,  total  mass  loss  rates  would  probably  not 
be  significant.  Therefure  the  flexible  radiator  concept  is  sound  and 
should  be  further  developed. 


m 


.  -  -  -  .  .  «  -  -  „  -  -  .  J.  -Jk  I,  •  „  W  *  n  h  w  -  *  M*  rn~+  J**  *.  S  ■*  “  ’ 


.fTrM 


s  •.> 


INTRODUCTION: 


Advancing  space  technology,  especially  defense  applications  indicates  a 
need  to  develop  new  space  radiators  capable  of  rejecting  large  quantities 
of  waste  heat.  One  suggested  radiator  for  this  purpose  is  to  te 
constructec  in  the  shape  of  a  large  cylinder,  from  a  lightweight  flexi¬ 
ble  material.4  Hot  components  will  be  sprayed  with  water.  This  watei 
would  flash  vaporize  arc1  fill  the  cylinder  causing  it  to  extend  into 
soace.  As  the  vapor  cooled  it  would  condense  on  the  cylinder  wall  where 
it  could  be  pumped  cut  of  the  radiator.  A  constant  retraction  force 
would  be  applied  to  pull  the  radiator  back  inside  the  spacecraft  as  the 
volume  decreased  due  to  condensation.  This  force  would  also  be  used  to 
keep  the  two  phase  mixture  inside  at  constant  saturation  pressure  and 
temperature . 

Unlike  radiators  with  rigid  structures  this  radiator  is  only  exposed  to 
the  harmful  space  environment  when  it  is  in  operation.  Even  though  this 
is  a  relatively  short  period  of  time,  the  radiators  susceptibility  to 
damage  from  micrometeoriods  must  be  evaluated.  These  particles  travel 
tnrough  space  at  approximately  20  km/s.  Since  the  radiator  is  light¬ 
weight  and  flexible,  it  is  probable  that  punctures  will  occur.  No 
previous  research  has  been  done  to  determine  what  will  happen  to  the 
internal  fluid  and  vapor  under  these  circumstances.  The  experiment 
conducted  was  designed  to  simulate  this  situation.  In  this  manner,  the 
extent  of  potential  damage  and  its  effects  on  radiator  performance  could 


be  determined. 


EXPERIMENTAL  APPARATUS  4  PROCEDURES 


The  experimental  apparatus  is  represented  by  the  schematic  diagram  in 


Figure  1.  The  test  section,  located  in  the  bell  jar  of  the  Veeco  Ve-4C0 


vacuum  machine,  is  a  double  waUed  stainless  steel  vessel.  It  has  an 


aluminum  membrane  holder  on  the  bottom.  An  electrically  controlled  15 


watt  solenoid,  bolted  to  a  cross-member  in  the  test  section,  is  used  to 


pierce  the  membrane  using  a  needle  attachment  threaded  into  the  plunger. 


Constant  temperature  water  is  pumped  from  the  Neslab  EX-100  Exacal 


constant  temperature  bath  through  the  outer  wall  of  the  vessel  to  keep 


the  internal  contents  at  constant  conditions.  This  water  is  also 


circulated  through  the  copper  coils  in  the  steam  generation  vessel  for 


the  same  purpose.  The  temperature  is  monitored  in  both  vessels  using 


type  T  thermocouples  and  an  Omega  21764  digital  thermometer.  The  two 


Celesco  E1PD  pressure  transducers,  located  on  the  top  of  each  vessel  are 


inked  to  a  Hewlett  Packard  7100  B  strip  chart  recorder  using  Celesco 


CDIO  carrier  demodulators. 


After  a  new  membrane  has  been  installed,  the  entire  system  is  evacuattd. 


The  bell  jar  is  pumped  down  to  0.1  mm  Hg  using  a  Duo  Seal  model  1397 


mechanical  vacuum  pump.  The  steam  generation  vessel  and  test  section 


are  evacuated  using  a  Duo  Seal  model  1402  auxiliary  mechanical  pump  to 


approximately  the  same  pressure.  Then  a  given  amount  of  water  is  added 


using  a  calibrated  syringe.  The  location  of  water  addition  for  each 


case  is  indicated  in  Figure  1.  Either  superheated  steam  or  saturated 


steam  with  a  condensate  layer  covering  one  side  of  the  membrane  will 
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occucy  the  test  section.  The  other  side  of  the  membrane  will  be  exposed 
to  the  vacuum  environment  in  the  bell  jar.  For  both  cases,  the  valve 
between  the  test  section  and  the  steam  generation  vessel  is  closed  at 
the  time  of  the  test.  When  the  desired  conditions  in  the  test  sectior 
are  obtained,  the  solenoid  is  activated  to  puncture  the  membrane.  For 
the  condensate  case,  there  is  no  pressure  or  temperature  drop  as 
condensate  is  expelled  from  the  test  section.  Therefore,  the  mass  loss 
rate  ’?  calculated  by  estimating  the  time  it  takes  for  the  entire 
condensate  layer  to  leak  out.  Sample  data  collected  for  this  case  is 
given  in  Table  1,  where  T  is  the  saturation  temperature,  Vadd  is  the 
volume  of  liquid  added,  and  t  is  the  time  required  to  expell  the  entire 
layer  of  condensate.  For  the  steam  case  the  pressure  loss  versus  time 
is  recorded  by  the  strip  chart  recorder.  The  temperature  and  pressure, 
Tj  and  Pj  are  noted  just  prior  to  puncture.  As  vapor  escapes  from  the 
test  section  the  pressure  in  the  bell  jar  increases.  This  pressure 
rise  is  monitored  by  the  pressure  thermocouple  gage  in  the  vacuum  test 
machine.  As  soon  as  this  pressure  rises  above  1.0  mm  Hg,  the  mass  loss 
rate  begins  to  decrease.  Therefore  the  test  is  ended  and  the  new 
temperature  and  pressure  in  the  test  section,  T^  and  are  recorded. 
The  time  is  read  from  the  strip  chart  recorder  plot.  Sample  data 
collected  for  this  case  is  given  in  Table  2. 


RESULTS  AND  DISCUSSION 


In  the  case  where  a  condensate  layer  was  covering  the  membrane,  it  was 
predicted  that  the  hole  might  seal  itself  by  the  following  process.  At 
the  instant  of  puncture,  a  small  percentage  of  liquid  would  flash 
vaporize  when  sucdenly  exposed  to  a  vacuum.  It  would  absorb  its  I  a  ter t 
heat  of  vaporization  from  the  remaining  water  in  the  vicinity  of  the 
hole,  causing  it  to  freeze  and  plug  up  the  hole. 

This  process  was  not  observed  even  when  using  the  smallest  needle 

available,  which  punctured  a  hole  of  0.029  mm2.  Apparently,  the  water 

was  expelled  from  the  hole  faster  than  the  sealing  process  could  take 

place.  The  water  did  freeze  when  it  landed  on  the  viewing  mirror  below 

the  test  section.  Mass  loss  rates  for  this  case  were  determined  by  the 

method  shown  in  sample  calculation  #1,  Appendix  1.  A  summary  of  results 

is  given  in  Table  3,  and  graphically  In  Figure  2.  A  hole  of  .029  irm2 

gave  a  mass  loss  rate  of  approximately  2.73  kg/hr.  For  a  25  MW 

Radiator*,  we  can  assume  an  operating  time  of  one  hour,  a  total  working 

fluid  mass  of  500  kg,  and  a  radiator  size  of  3  m  in  diameter  by  100  m 

2  3 

long.  Using  a  probability  model  ’  as  shown  in  sample  calculation  #2, 
a  radiator  this  size  can  expect  a  0.2%  chance  of  being  struck  by  a 
micrometeoroid  large  enough  to  puncture  the  hole  discussed.  Under  these 
circumstances,  the  total  reduction  in  mass  is  less  than  0.6%  of  the 
total  working  fluid.  This  indicates  that  the  mass  loss  associated  with 
this  case  may  not  be  significant.  However,  as  meteoroid  size  decreases, 
the  chance  of  puncture  increases.  Therefore  it  is  possible  that  many 
smaller  holes  will  be  present.  The  possibility  of  sealing  in  these 
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smaller  holes  has  not  been  ruled  out.  As  hole  size  decreases,  one 
surface  tension  and  viscosity  of  the  water  play  an  increasing  role  in 
slowing  down  the  flow  rate  of  water.  This  nay  result  in  freezing  before 
expulsion  causing  the  hole  to  seal  itself  as  discussed  earlier. 
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The  mass  loss  rates  predicteo  by  this  experiment  may  be  much  higher  than 
would  occur  in  space.  Tms  is  due  to  the  feet  that  the  pressure 
difference  causec  the  membrane  to  curve  and  the  puncture  was  located  in 
the  bottom  as  seen  in  figure  3.  On  earth  gravity  was  responsible  for 
delivering  more  condensate  to  the  vicinity  of  the  hole.  In  space,  the 
lack  of  a  boay  force  may  greatly  diminish  the  mass  loss  rates.  A  small 
amount  of  condensate  would  leak  out  and  leave  the  hole  exposed  to  steam 
only  as  seen  in  Figure  4.  This  would  cause  continued  leakage  to  occur 
according  to  the  steam  only  case. 

In  the  steam  only  case,  mass  loss  was  seen  to  be  so  low  that  it  is 
insignificant  and  will  not  effect  radiator  performance.  The  results  for 
this  case,  obtained  according  to  sample  calculation  #3,  are  summarized 
in  Table  4.  The  experimentally  determined  mass  loss  rates  versus 
puncture  area  can  be  seen  graphically  in  Figure  5.  The  slope  of  this 
plot  is  the  average  mass  flux.  This  value  compared  nicely  to  the 

4 

theoretical  prediction  from  choked  flow,  as  seen  in  sample  calculations 
4  &  5. 

2 

The  experimental  mass  flux  was  0.1250  kg/hr  mm  and  the  theoretical 
value  was  0.1216  kg/hr  mmz.  This  is  less  than  a  20 %  difference 
including  the  experimental  uncertainty  which  is  given  in  Appendix  2. 


Assuming  the  same  puncture  conditions  and  radiator  dimensions,  the  mass 

_4 

loss  is  only  0.00363  kg/hr  or  a  7.25  x  10  %  decrease  in  total  mass. 

This  experiment  is  not  truly  representati ve  of  actual  operation  in  that 
superheated  steam  near  ?C°C  and  20  kPa  was  used  eAperimente t iy .  In 
reality,  saturated  steam  at  70°C  and  31.19  kPa  would  occupy  the  radia¬ 
tor.  Therefore,  the  actual  mass  loss  rate  for  this  case  would  be  higher 
but  still  insicnificart. 

For  each  of  the  two  cases  previously  discussed,  two  different  membra  re 
materials  were  tested.  One  was  a  clear  plastic  laminate  0.152  mm  thick. 
The  other  was  a  plastic  -  aluminum  film  laminate  C.137  rim  thick.  Table  5 
lists  material  type,  actual  hole  area.  A,  needle  cross-sectional  area, 
An,  and  the  ratio  An/A  for  each  run.  Due  to  the  wide  variation  in  the 
area  ratio,  no  correlation  can  be  made  between  needle  size  and  hole  size 
for  the  two  materials  tested.  Examples  of  the  different  punctures  are 
shown  in  Figures  6  and  7.  The  clear  plastic  stretched  more  readily  and 
then  puncture  was  fairly  clean  and  round.  The  aluminum  -  plastic 
material  ripped  when  the  needle  was  forced  through.  Due  to  the 
irregular  hole  shapes  area  calculation  was  difficult.  Pictures  of  the 
punctures  were  taken  at  high  magnification.  A  grid  was  used  to  estimate 
the  area  in  the  photograph.  This  value  was  then  reduced  by  the 
magnification  factor  to  determine  the  actual  puncture  area.  The  error 
associated  with  this  calculation  is  probably  not  more  than  10%. 
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CONCLUSIONS  u  RECOMMENDATIONS 


From  the  experimental  results  obtained,  it  is  concluded  that  damage  due 


to  micrometeoroics  will  not  significantly  effect  radiator  performance. 


The  total  mass  loss  over  the  entire  operating  period  probably  would  not 


exceed  two  percent  in  the  worst  case,  however  considering  the  results 


of  the  condensate  case  it  is  highly  desirable  to  minimize  the  thickness 


of  the  condensate  layer  as  much  as  possible.  This  will  reduce  mass 


loss,  as  well  as,  thermal  resistance  to  heat  transfer.  Also,  when 


considering  a  design  for  liguio  return,  care  should  be  taken  in  avoiding 


tne  delivery  of  condensate  to  the  vicinity  of  a  hole. 


To  more  accurately  determine  the  extent  of  damage  in  space,  the  conden¬ 


sate  case  should  be  redone  in  a  zero-gravity  environment.  The  effects 


of  gravity  on  mass  loss  may  be  great  for  this  case.  Without  gravity, 


the  flow  rate  through  the  hole  will  decrease  .  For  this  reason,  it  is 


entirely  possible  that  the  sealing  process  discussed  will  occur  more 


readily.  If  not,  the  lack  of  a  mechanism  to  deliver  more  condensate  to 


the  vicinity  of  the  hole,  may  still  diminish  mass  loss  significantly. 


In  any  case  the  mass  loss  estimates  provided  here  are  the  maximum  that 


could  possibly  occur.  Since  these  are  acceptable,  micrometeoroia  damage 


will  not  be  a  problem,  and  the  flexible  radiator  concept  should  be 


further  researched  and  developed. 


*«  . 
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•water  ADOITIO*  FOR  CONDCNSATE  CASE 
—WATER  ADDITION  FOR  STEAM  CASE 


y 


Af?; 

k 


(A)  -BELL  JAR,  VEECO  VE-400  VACUUM  TEST  MACHINE  (V-lOOOOOcc) 

(B)  -STAINLESS  STEEL  DOUBLE  MALL  TEST  SECTION  (VbJSOOcc) 

(C)  -STEAM  GENERATION  VESSEL  (V-22500CC) 

(D)  -NESLAB  EX-100  EXACAL  CIRCULATING  CONSTANT  TEMPERATURE  BATH 

(E)  -OMEGA  21764  DIGITAL  THERMOMETER 

(PI- HEWLETT  PACKARD  7100B  STRIP  CHART  RECORDER 
(G) 4 (H) -CELESCO  CD10  CARRIER  DEMODULATORS 
( I ) 4 ( J ) -CELESCO  El PD  PRESSURE  TRANSDUCERS 
(K) -SOLENOID- NEEDLE  PUNCTURE  ASSEMBLY 


FIGURE 


APPARATUS  SCHEMATIC 
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TEST  SECTION 
WALL 


SATURATED  STEAM 


CONDENSATE  LAYER 


MEMBRANE  HOLDER 


PUNCTURE 


'MEMBRANE 


VACUUM  ENVIRONMENT  0.1  mm  Hg 


FIGURE  3:  GRAVITATIONAL  DELIVERY  OF  CONDENSATE  TO  PUNCTURE 


SATURATED  STEAM 


CONDENSATE  LAYER 


PUNCTURE 


RADIATOR  WALL 


VACUUM  ENVIRONMENT  OF  SPACE 


FIGURE  4:  ZERO-G,  NO  CONDENSATE  DELIVERY  TO  PUNCTURE 
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A=  0.02  6  m‘  Dn  =  0.57  2  rani 


FIGURE  6 


1  EXAMPLE  PUNCTURES ,  ALUMINUM- PLASTIC  LAMINATE 


SAMPLE  CALCULATIONS  *1  (Condensate  Case) 


35v:  Csta: 


*  added  '  5-'  c”‘  at  ?c”c  'Led  ’  4'99? 

V  test  sect  '  3800 

V  tot  =  3800  c,'3/4-^S  =  761.5  cm3/g 


'r  rV~<  v-/  O.P.  Heir  a:. ,  "f  cr;.  jjyic,  ::l 

Vf  =  1.0228  cm3/g 
vc  =  5042  cm3/g 

Vtot  =  Vf  f  x(vg  -  vf) 

761.5  =  1.0228  f  x(5042  -  1.022 b) 

x  =  0.151 
(1  -  x)  =  0.849 

grams  of  condensate  layer  =  (0.849) (4.99)  =  4.24  g 
m  =  4.24  g/5.6  sec  =  0.757  g/s 

g=5=24Z3_ksZyc= 

"flux  *  "'A 

Mf 1  ox  =  k9/6r  mm3 
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SAMPLE  CALCULATION  ff2 


Puncture  Probability 

From  References  (2)  and  (3)  for  a  meteoroid  of  mass  10'^  grams  or  less 
log10Nt  =  -14.37  -  1.2131 og ^qM 

kvfiere  N  =  Number  of  particles  of  mass,  m  or  greater  per  square 
meter  of  space  per  second. 

M  =  Meteoroid  mass  in  grams. 

Assume  a  meteo-  oid  mass  density  of  0.5  grams/crn3  for  all 
metecrcids . 

For  hole  area  -  w.029  mm2 

Assuming  the  .crometeroid  has  tne  same  cross-^ectiona I  area  as  the  hole 
voiume  of  meteoroid,  V  =  0.030  um3  =  3.0  x  10"J  cm3 

m  =  1/(5  x  LG'5)  grams. 

iog10  Nt  =  "14-37  *  K213  1ogio  1,5  x  10*5 
=  3.0  x  lO'9  particles/m2s 

ASSUME:  Average  radiator  cross  sectional  area  =  150m2 
Operating  time  of  1  hour  =  3600  seconds 
Number  of  punctures  =  x  A  x  t 
=  0.00164 

0°o  There  is  less  than  a  Q.2%  chance  that 

d=Bugc|uce=idi&=|ize=Qr=aceater=tfill=Qccuc. 


SAMPLE  CALCULATION  #3  (Steam  only) 

k'av  Data:  =  7G.4CC  T2  =  69.4°C 

Pj  =  22.23  k Pa  P2  =  20.54  kPa 

t  =  7.3  sec 

Since  Z**1.C;  Use  Ideal  Gas  Law 
v  =  RT 

r  3 

Vj  =  / 119.3  cm  /g 
-  7682.6  cm  “^g 

Volume  cf  Test  Section:  V  =  3800  cm3 

ni  1  =  3800  cm3/71 19.3  cm3/g  =  0.5338g 
m2  =  380G  cm3/7682.6  cm3/g  =  0.4946g 

• 

m  =  m,  -  m„  =  0.5338  -  0.4946 

'+T*  - 773 - 

m  -  0.00536  g/s 

?=I=SiQi22=' 

From  slope  of  m  vs  a  steam  case  plot 
Mflux  =  0.1250  kg/hr  mm2 
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SAMPLE  CALCULATIONS  #4  Steam  Case  (theoretical) 

Frcr.  (*)  Ojwat1.  tsch/Kuerti  ,  Gas  Dynamics,  1956 

The  mass  flux  of  a  vapor  leaking  from  a  vessel  Into  a  vacuum  through 
an  orifice  is  given  by  the  choked  flow  equation: 


flux 


where  Cc  * 


On  = 


’  (jh)  ^  c°p° 

speed  of  sound  at  internal  conditions 
vapor  density  at  internal  conditions 
ratio  of  specific  heats 


For  H^O  vapor  at  70°C,  2C  kPa 
y  =  1.33 

R  =  460.6  J/kg  K 

T  =  342. 2K 
c 

CQ  =  (  o  RTo)i  =  457.85  m/s 

From  Ideal  Gas  Law,  Z=l.(j 

2o  =  Po  =  0.1265  Kg/nT1 
RJZ 

Mflux  =  33-78  k9/sm2 

rJflux=~Qii210gZtjc=Elf= 
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SAMPLE  CALCULATION  #5 

Experimental  and  theoretical  comparison  (Steam  case) 


From  slope  of  m  vs  A  plot 

experimental  -  -.1150  kg/nr  mm2 

From  sample  calculation  *2 

theoretical  =  0.1216  kg/nr  inrn2 

error  =  O.itbO  -  u.ii!6  ..  inri  _  2.27 % 

0.1250  x  1  u  ' 

I=§?T0C=i=w42t'x 

including  Uncertainity  Calculation  in  Appendix 
a-fiCCQr.f  *.ZQ% 
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UNCERTAINTY  ANALYSIS: 


D 


All  uncertainty  calculations  were  performed  in  the  standard  way 
such  that  the  uncertainty  in  any  value  F,  u)p,  is  given  by: 


Where  :  F  =  F  (v1  ,  v2  ,  .  .  .  vR  ) 


CONDENSATE  CASE: 

mass  flow  rate; 

mass  flux: 


^m 


20% 


^Mflux 

Mflux 


25% 


STEAM  CASE: 

mass  flow  rate; 

mass  flux; 


m 


10% 


uJ 


M 


flux 


Mfi 


ux 


15% 


PUNCTURE  AREA: 
area ; 


CJ, 
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ABSTRACT 


Computation  of  combustion  chamber  flOMfields  has  been  of  interest  in 


recent  years  because  of  the  enormous  benefits  to  be  reaped  from  the 


improvements  in  ram  jet/turbo  jet  engine  performance.  An  investigation  Mas 


undertaken  to  evaluate  proposed  modifications  to  the  turbulence  model  to 


account  for  Iom  turbulence  Reynolds  number  effect  and  streamline  curvature 


effect.  The  vehicle  for  this  computational  study  Mas  a  computer  program  Mhich 


Mas  used  to  solve  the  ful ly-el 1 iptic  Navier-Stokes  equations  based  on  the 


methodology  of  Gasman  e_t  al_.  The  program  is  currently  capable  of  calculating 


compressible*  recirculating,  ax isymmetr ic  or  tMa-dimensional *  internal  floMS. 


This  report  describes  neM  studies  conducted  on  the  recirculating  combustor 


flOMfield  by  using  modified  forms  of  the  k-e  turbulence  model.  Details  of  the 


methodology  adopted  far  calculating  compressible  floM  are  also  discussed  in 


this  report. 
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NOMENCLATURE 


chamder  diameter 
inlet  diameter 

constant  in  turbulence  model 
generation  term  in  turbulence  model 
total  enthalpy 

constant  in  turbulence  model 

turbulent  kinetic  energy,  thermal  conductivity 
macro  length  scale 
source  term 

coordinate  tangential  to  streamlines 

coordinate  normal  to  streamlines 

velocity  component  in  the  axial  direction 

velocity  component  in  the  radial  direction 

rate  of  generation  of  turbulence  energy 

time-mean  pressure 

static  tempe  ature 

gas  constant 

Reynolds  number 

radial  coordinate 

axial  coordinate 

distance  normal  to  the  wall 

constant  in  turbulence  model 

constant  in  turbulence  model 

shear  layer  thickness 

exchange  coefficient 


dynamic  viscosity 


kinematic  viscosity 

turbulent  energy  dissipation  rat* 

density 

Prandtl-Schmidt  number 
shear  stress 

variable  representing  various  flow  parameters 

inlet 

reference 

turbulent  parameters 


INTRODUCTION 


Combustion  chamber  designs  for  turbojet  and  ramjet  engines  that  have  been 
developed  over  the  last  Tew  decades  have  resulted  in  improved  designs  having 
much  higher  levels  of  performance.  The  designers,  however)  are  faced  with 
trial  and  error  procedures  because  of  the  uncertainties  in  predictive 
capability.  The  reasons  f or  this  are  many.  The  interplay  of  several  physical 
phenomena)  such  as  turbulence*  multiphase  flow*  and  chemical  reaction,  makes 
the  flowfield  very  complex  and,  therefore,  difficult  to  analyze.  Very  often 
the  flowfield  is  three-dimensional  in  nature,  and  this  imposes  severe 
limitations  on  the  computations  in  terms  of  storage  and  computation  time.  When 
a  computer  code  is  successfully  developed,  it  is  often  found  that  there  are 
few  experimental  data  available  to  prescribe  the  boundary  conditions 
meaningfully  or  to  compare  with  the  predictions. 

Some  encouraging  developments  have  taken  place  in  recent  years  that 
address  some  of  the  problems  discussed  above.  Good  progress  has  been  made  in 
the  numerical  modeling  of  the  (Navier-Stokes)  equations  governing 
recirculating  flowfields  typical  of  a  ram jet/turbo jet  combustion  chamber. 
Turbulence  models  capable  of  predicting  the  flowfields  in  a  wide  range  of 
physical  situations,  such  as  free  shear  flows  (jets  and  wakes),  wall-bounded 
flows  (boundary-layers) ,  and  confined  jets,  have  been  developed.  Chemical 
reaction  models  of  varying  degrees  of  sophistication  are  currently  being  used 
for  combusting  flows.  These  models  range  from  a  reactants-and-products 
equilibrium  chemistry  model  to  finite-rate  chemistry  models  with  multi-step 
reactions  involving  several  chemical  species.  Recent  developments  in 
namntrusive  experimental  techniques  have  made  it  possible  to  make  accurate 
measurements  of  mean  velocity  and  turbulence  even  in  highly  turbulent, 
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recirculating  flow  regions.  Therefore*  it  is  now  possible  to  accurately 


specify  the  boundary  conditions  for  the  solution  of  the  equations;  one  is  also 
able  to  make  meaningful  comparisons  between  experiments  and  predictions 
without  unduly  worrying  about  experimental  uncertainties. 

Some  combustor  configurations  that  are  currently  being  investigated  are 
the  dump  combustor  and  the  center  bluff  body  combustor  (Figures  1  and  2).  The 
dump  combustor  appears  to  be  particularly  attractive  because  of  its  ability  to 
decelerate  the  flow  and  create  recirculating  zones  for  flame  holding  and  flame 
stabilization  without  a  significant  amount  of  pressure  loss. 

BACKGROUND 

The  numerical  solution  of  the  time-averaged*  fully  elliptic  Navier-Stokes 
equations  poses  several  difficulties  because  of  the  coupled*  nonlinear  nature 
of  the  equations.  The  solution  becomes  particularly  cumbersome  when  the 
flowfield  considered  is  multidimensional*  turbulent*  compressible*  and 
chemically  reacting.  Turbulence  introduces  additional  complexities  because  of 
what  is  known  as  the  'closure'  problem*  which  makes  it  necessary  to  '“sort  tG 
turbulence  model ing*-1*.  In  compressible  flows*  an  additional  equation  (the 
energy  equation)  must  be  solved,  and  the  fluid  density  becomes  a  variable  and 
must  be  calculated  from  an  equation  of  state.  Chemical  reaction  introduces 
additional  equations  for  the  transport  of  various  chemical  species. 

The  first  aspect  of  the  problem  that  was  dealt  with  in  the  present  study 
was  the  numerical  algorithm  for  solving  the  set  of  nonlinear,  coupled,  partial 
differential  equations  governing  the  flowfield.  Solutions  of  the 
two-dimensional  flow  problems  have  been  obtained  in  the  past  with  vorticity 
and  stream  function  as  the  dependent  variables.  A  more  widelv  used  approach 
was  developed  by  Patankar  and  Spalding*3  who  employed  the  SIMPLE  (Semi  - 


32.6 


Implicit  -  Pre ssure  -  jinked  -  Equation*)  algorithm  for  solving  the  equations 
in  primitive  variables.  Their  method  has  several  features  in  common  with  the 
earlier  work  of  Harlow  and  Welch14*.  Some  of  the  deficiencies  of  these  methods 
have  been  widely  recognized*  and  recently  some  alternative  methods  have  been 
proposed 19-17  to  overcome  these  deficiencies.  Some  of  these  methods  are  still 
in  the  development  stage*  and*  therefore*  their  applicability  is  yet  to  be 
tested.  The  SIMPLE  algorithm  has  been  widely  used  for  the  solution  of  the 
Navier  -  Stakes  equations  governing  parabolic  as  well  as  elliptic 
(recirculating)  flows.  Despite  its  shortcomings*  the  method  has  successfully 
predicted  a  wide  range  of  flowfields.  Several  investigators  have  used  the 
method  to  predict  the  flowfield  in  combustion  chambers  of  different 
geometr ies17-9* . 

The  problems  of  turbulence  modeling  are  still  intriguing  investigators  in 
the  field.  One  approach*  which  has  gained  wide  popularity*  is  the  k-e  model1 
in  which  k  and  €  represent  respectively ' the  turbulent  kinetic  energy  and  its 
dissipation  rate.  The  k- €  model  treats  trubulence  by  means  of  transport 
equations  for  these  two  variables.  Several  versions  of  the  k-e  model  are 
in  use*  however,  none  of  them  gives  uniformly  good  results  for  vastly  varying 
flow  conditions.  Other  approaches,  such  as  Reynolds  stress  models  and  pdf 
models,  can  be  found  in  the  literature.  It  appears  that  the  k-e  model  offers 
more  satisfactory  results  over  a  wide  range  of  flow  conditions  in  comparison 
to  the  other  turbulence  models,  which  give  good  predictions  in  some  cases  and 
perform  poorly  in  others.  Recent  use  by  the  principal  investigator  of  a 
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fv  computer  cod*  for  calculating  compressible*  recirculating  flow  in  internal 

geometries  has  brought  to  the  surface  some  deficiencies  of  the  predictive 


character istics  of  recirculating  flows.  Regions  of  the  flowfield  where  the 
streamlines  have  large  curvature  are  known  to  yield  unrealistic  predictions 
when  the  standard  k- e  model  of  turdulence  is  used.  Furthermore,  the  effects 
of  turbulence  Reynolds  number  on  the  flowfield  are  also  largely  unknown.  The 
present  study  was  directed  towards  addressing  these  two  problems. 


THE  TURBULENCE  MODEL 


The  turbulence  model  that  is  most  widely  used  in  the  prediction  of 
flowfields  in  internal  geometries  is  the  k-e  model  in  which  k  and  e  are, 
respectively  the  turbulent  kinetic  energy  and  its  dissipation  rate.  The  model 
prescribes  these  quantities  in  terms  of  the  transport  equations  for  these 
variables.  The  equations  of  continuity*  momenta*  energy,  and  the  two  transport 
equations  for  k  and  t  are  given  in  the  appendix.  The  reason  for  representing 
all  the  equations  in  one  general  form  is  the  ease  of  numerical  implementation. 
The  transport  equations  for  k  and  e  are  reproduced  below  for  clarity. 


fx (puk)  ♦  i  h  (pvrk)  *  h  cu  ♦  rj  Ss 


_i)  SSj  ± 

oT'  8xJ  r  ar 


17  rf, 


J-lo uc) 


(1) 

(2) 


In  addition,  the  auxiliary  relation  for  turbulent  viscosity  is  given  by 


u 


t 


(3) 


The  terms  <r  .ar.  ,  c.  ,  c  and  C,,  which  appear  m  the  equations  for 

k  t  3  i  7  r*' 

k,  e  and  equations,  are  empirical  constants,  which  must  be  determined  by 


adjusting  their  values  to  fit  experimental  data.  The  above  equations  apply  in 


w. 


1 

i 


regions  of  high  turbulence  Reynolds  number  where  the  molecular  viscosity  is 


negligible.  The  expression  for  the  turbulent  Reynolds  number  is 


Re*  =  u ’ 1 / v 


in  which  u'  is  the  fluctuating  velocity,  and  1  the  macro  length  scale. (This  is 


of  the  order  of  the  transverse  dimensions  of  the  geometry) 


Several  investigators7- * 1 ■ 13  previously  concluded  that  for  low  turbulent 


Reynolds  number  flows,  the  viscous  dissipation  is  important,  and,  therefore. 


its  effects  must  be  accounted  for  in  the  turbulence  model.  Jones  and  Launder 


and  Chien  proposed  modifications  to  account  for  low  turbulence  Reynolds 


number.  The  essentials  features  of  the  two  models  are  the  same;  however,  a 


few  differences  may  be  noticed  in  their  detailed  implementation.  A  brief 


review  of  the  two  models  is  given  below. 


1  .Jones  and  Launder  Model 


This  model  is  closely  related  to  the  Harlow  and  Nakayama*  model  which  also 


contains  proposals  for  the  way  in  which  molecular  viscosity  exerts  direct 


influence  on  the  turbulence  when  the  turbulence  Reynolds  number  is  low.  The 


Jones  and  Launder  model  has  been  widely  tested  for  a  range  of  flow  conditions. 


Their  model  was  able  to  predict  the  observed  behavior  of  the  wall  Stanton 


numoer  m  flows  in  which  laminar ization  was  present.  They  enlarged  the  model 


in  the  'allowing  three  ways. 


i)  Viscous  diffusion  of  k  and  €  was  included. 


ii  'he  empirical  constants  in  the  transport  equations  were  made  functions 


of  the  turoulent  Reynolds  number. 


iii)  Terms  were  added  to  account  for  the  fact  that  dissipation  processes  are 


not  isotropic. 


The  k  and  the  <  equations  for  this  model  are  as  follows. 


turbulent  kinetic  energy: 


v.  v, 


(5) 


Energy  dissipation  rate: 

n(pu‘)+7^(pvt*)  -  ^C[(“>3r)n1>7^&<w>3?)l71 


*  C1  \  G  *  ^  p  T  +  2M  aii 
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Eddy  viscosity: 


t  ■  C'  p  — 
t  w  e 


Turbulent  thermal  conductivity: 


It  *  C  /7 
t  p  c  h 


In  the  above  equation  set  the  C’s  and  the  cr’s  retain  the  values  assigned  to 
them  in  the  standard  k-  e  model.  (Table  1)  The  influence  of  the  Reynolds 
number  is  introduced  by  way  of  the  f’s  which  are  assigned  the  following  forms. 


1  -  3  exp  (  -Re*  ) 

exp  C  -2.3  /  <1  /  Re,/30>  1 


where  Re,  =  p  ]s/P€  may  be  interpreted  as  the  Reynolds  number  of 
turbulence.  These  authors  made  €  as  the  isotropic  part  of  dissipation  and 
made  it  go  to  zero  at  the  wall  because  they  could  achieve  decisive 
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computational  advantages.  They  showed  that  the  total  dissipation  at  the  wall 

Becomes  equal  to  the  last  term  on  the  right  hand  side  of  the  energy  equation. 

2 

In  addition  they  used  another  term  2nu,  *>_u  in  the  dissipation  equation 

dy2 

in  order  to  obtain  better  agreement  with  experimental  data.  They  did  not  offer 
any  explanation  for  the  presence  of  this  term  except  for  the  fact  that  the 
inclusion  of  this  term  provided  better  agreement  with  experimental  data.  They 
chose  f»  so  that  the  model*  when  applied  to  the  calculation  of  the  decay  of 
grid  tu.  oulence*  accorded  with  experiment  for  both  high  and  low  turbulence 
intensities.  The  form  of  the  function  f  was  determined  by  focusing  on  the 
prediction  of  constant  stress  couette  flow  wherein  the  turbulent  viscosity 
formula  given  above  was  not  used  to  calculate  turbulent  viscosity.  Instead* 
u«  was  obtained  by  way  of  the  Van  Driest  form  of  the  mixing  length  formula. 
This  practice  enabled  attention  to  be  focused  on  the  «  equation  which  was 
then  adjusted  to  produce  a  reasonable  turbulence  energy  distribution  in  the 
viscous  sublayer  region. 
a.Hanielic  and  Launder  hodel 

Hanjelic  and  Launder10  discussed  the  specific  effects  of  viscosity  on  the 
various  transport  processes.  They  presented  numerical  solutions  for  turbulent 
channel  flows  at  low  Reynolds  number  as  well  as  a  case  of  severely  accelerated 
boundary- layer  in  which  the  turbulent  shear  stress  becomes  negligible  compared 
with  viscous  stresses. 

The  equation  for  dissipative  transport  has  been  used  in  the  following  form 
by  Hanjelic  and  Launder. 


De  _  C 
Dt 


It  “k 


(12: 


where  P  is  the  rate  of  generation  of  turbulence  energy  by  the  mean  strain 
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rate.  Tennekes  and  Lumley-*  omitted  the  first  term  in  Eq.  12  on  the  grounds 
that  the  tern  containing  the  mean  field  variables  were  of  a  smaller  order. 

However ,  Hanjelic  and  Launder  argued  that  a  positive  source  term  must  be 
present  in  the  equation  so  as  to  avoid  physically  unacceptable  form  of 
modeling.  Lumley  and  Khajeh  Nouri*  preferred  to  have  the  term  (uiu,/k  -  2/36^)  € 

instead  of  P  in  Eq.  12.  Hanjelic  and  Launder  preferred  to  use  P  rather 
follow  the  argument  of  Lumley  and  Khajeh  Nouri.  Extensive  numerical  testing 
conducted  using  P  has  been  put  forth  as  a  reason  for  their  choice  of  the  term 
P  in  their  model.  In  a  homogeneous  decaying  turbulent  flow  Eq.  12  becomes 
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A  consequence  of  this  equation  is  that  the  turbulent  kinetic  energy  decays  at 
a  rate  of  x_"  where  x  is  the  distance  downstream  of  the  grid  which  generates 
the  turbulence  and  n  is  an  index  whose  value  is  given  by 


n 


(  14 ) 


The  variation  of  n  behind  the  grid  is  between  1.8  and  2.3  as  observed  from 
experiments.  Hanjelic  and  Launder  assumed  that  this  variation  Mas  entirely  due 
to  the  diminution  of  the  turbulence  Reynolds  number  Re*.  Therefore*  they 
argued  that  C  a  should  be  a  function  of  Re*.  The  particular  form  of  the 
dependence  was  based  on  the  experiments  of  Batchelor  and  Townsend.  Thus* 
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Chien7  added  kinematic  viscosity  V  to  account  for  molecular  diffusion  of 
k  and  t  .  The  dissipation  term  in  the  e  equation  mas  modified  to  fit  the 
data  of  decaying  grid  turbulence  at  high  as  well  as  low  turbulent  Reynolds 
numbers.  Chien’s  handling  of  the  effect  of  the  presence  of  the  solid  wall  is 
different  from  that  of  previous  authors.  He  uses  Taylor  series  expansion  of 
the  fluctuating  velocity  components  near  the  wall.  He  showed »  by  the  use  of 
the  continuity  equation  and  the  no  slip  condition  at  the  wall'  that 

k  ~  y* 
v,  ya 

It  can  be  shown  by  Taylor  series  expansion  near  the  wall  that  isotropic 


dissipation  is 


(.  ~  y* 


Chien  showed  that  the  true  rate  of  energy  dissipation  is  given  by 

D  »  3  V  k/y*  (17) 

in  which  v  is  the  kinematic  viscosity,  k  the  turbulent  kinetic  ersrgy  and  y 
the  distance  from  the  wall.  Therefore,  the  low  turbulent  form  of  the  k 
equation  can  be  written  as 


;  )  *  1  +  't(^) 
c  jy  :y 


This  equation  differs  from  the  standard  form  of  the  k-«  model  because  of  the 
presence  of  the  last  term  on  the  right  hand  side.  The  «  equation  gets 
modified  in  Chien’s  model  as 


f(r  +-!)  |t]  +  C,  f  ’t  &)' 

Ot  dy  *  t  dv  1  *.  -y 


—  i~  [C,  f_  £  +  exp  (-C,  u*y/v)] 
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in  which  f£  is  given  by  Eq.  16  and  u*  denotes  the  friction  velocity.  Chien 
used  C*.  *  o.S  in  the  above  equation. 

4. Present  Modifications  of  the  above  Models 

Modified  forms  of  the  Jones  and  Launder  model  and  the  Chien  model  were 
used  for  the  present  study.  The  modif ications  were  implemented  because  of  the 
realization  that  wall  bounded  flows  are  different  from  the  flow  in  the 
inviscid  core  of  a  confined  jet.  It  is  reasonable  to  assume  that  the  flow  is 
isotropic  in  the  inviscid  core  region;  therefore,  the  presently  proposed  model 
differs  from  those  cited  aOove  in  that  the  nonisotropy  terms  are  absent. 
Moreover,  the  present  calculations  did  not  use  terms  to  account  for  wall 

damping  effects.  Eqs.  3  and  6  were  modified  to  reflect  these  changes.  The  term 

/a  k1 ' 2  \  2  2 

j  dropped  from  Eq.  3  and  indicated  earlier  the  term  2mM, 

was  also  dropped  from  Eq.  6.  Jones  and  Launder  introduced  the  last  term  in  Eq. 

6  purely  on  the  basis  of  obtaining  better  agreement  with  experimental  data  of 

wall  bounded  flaws;  it  is  felt  that  this  is  not  a  sufficient  ’•»«on  to 

introduce  this  term  in  the  present  calculations. 

In  order  to  investigate  the  usefulness  of  the  two  models  in  flow  regimes 

characterized  by  a  sudden  axisymmetric  expansion,  a  different  and  complete  set 

of  calculations  were  performed  usinq  the  modified  form  of  Chien’s  model.  All 

the  additional  terms  to  account  f or  low  turouient  Reynolds  number  effects  in 

Chien’s  model  were  carefully  examined.  It  was  concluded  that  for  the  present 

study  only  the  term  C2t(  —  in  Eq .  19  needs  to  be  retained.  The  basis  'or 

k 

this  conclusion  is  the  fact  that  in  the  inviscid  core  the  other  effects 


discussed  in  Chien’s  paper  are  not  important. 


I 


Another  aspect  of  the  turbulence  model  that  Mas  investigated  is  the  effect 
of  streamline  curvature.  This  is  particularly  important  in  the  recirculation 
region  where  one  comes  across  large  curvature  of  the  streamlines.  Bradshaw** 
reviewed  the  experimental  studies  to  determine  the  effects  of  streamline 
curvature  on  turbulent  flows  and  concluded  that  the  standard  turbulence  models 
(mixing  length  and  k-€  models)  do  not  reflect  the  sensitivity  of  turbulence 
to  streamline  curvature.  Modifications  of  the  k- «  model  to  account  for 
streamline  curvature  were  reported  by  Leschziner  and  Rodi11.  These 
modifications  are  based  on  Gibson’s  algebraic  stress  model*.  The  algebraic 
stress  equation  is  written  in  general  form  as 


p.j  -  «  |  a..  k)  *  KPjj  -  \  a..  Pk)  *  ]  a;j  c 


In  which  P.j  is  the  production  of  turbulent  stress  uTu ,  and  a  and  are 
constants,  which  assume  the  values  of  1.5  and  0.6  -espectively  as  given 
uescnzmer  ana  Radi.11  The  term  P *  stands  Tor  the  oroduction  of  turbulent 
kinetic  energy,  and  ,5 » j  is  the  Kronecker  delta.  Gibson’s  algeoraic  stress 
model  assumes  local  equilibrium  —  total  energy  supply  is  equal  to  the  total 
energy  dissipation,  under  this  assumption  one  can  write  =  e  ,  and  the 
above  equation  'educes  to 


a.u.  ,  .  ,  a.. 
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In  order  to  see  the  s^'ect  of  streamline  curvature,  this  equation  can  be 
written  m  the  streamline  coordinates  s,n),  ;n  which  s  is  the  streamwise 
coordinate,  ana  n  the  normal  coordinate. 
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In  the  above  equations.  Rc  is  the  radius  of  curvature  of  the  streamline,  and 
the  mean  velocity  in  the  radial  direction.  Further  simplifications  are 
achieved  by  Lesch2iner  and  Rodilt  by  stipulating  that 


Althouqh  it  appears  reasonable  to  assume  that  m  gy  /8q  ■  0, the 

additional  assumption  that  U.-/r  *  0  does  not  seem  to  be  a  particularly  sound 
one.  This  may  be  easily  seen  from  Figure  3.  The  ratio  U^/r  does  nave 
appreciable  values  in  places  where  the  streamlines  have  large  inclinations 
with  reference  to  the  axis  'plane)  of  symmetry.  Therefore,  U,-/r  was  retained 
in  the  present  calculations.  The  modified  form  of  the  snear  stress  equation 
was  obtained  from  Eos.  22-2<*. 
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in  whicn 


< »  -  ; 1  -  Q  ) /  a  ,  and 

K,  =  2  (  l  -  «  -  a  i  /  i3o  ) 

3v  comparing  Ea. 26  to  the  expression  for  eddy  viscosity, 
it  can  be  easily  seen  that 
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Except  for  the  retention  of  the  term  K,k.  -r 

1  r 


the  expression  for  C 


is  the  same  as  that  given  by  Leschziner  and  Rodi11.  The  value  of  0.09 


was  used  for  K,K«  following  the  argument  given  by  these  authors. 


GOVERNING  EQUATIONS  AND  NUMERICAL  MODELING 


The  eouations  governing  the  compressible,  ax lsymmetr ic ,  turbulent  flow  of 


a  perfect  gas  can  be  Mritten  in  a  convenient  form  as 


j[£(purrf)  -  £  (pvt*)  -±  (tT4  J|: 


8  Cr r  *4 
’  Vt  {tr4ai 


K>l  '  s4 


In  the  aoove  equation  the  variables  <9  and  r  assume  different 


meanings  for  the  equations  of  continuity,  momentum,  energy,  turbulent  kinetic 


energy  and  its  dissipation  rate.  The  general  form  of  the  equations  given  py 


Ed.  29  is  particularly  useful  for  their  numerical  solution. 


"or  compressible  flows  density  is  also  a  variable  and  it  .s  calculated 


using  the  equation  of  state  for  a  perfect  gas.  for  chemical!/  reacting  ■flows 


there  will  oe  additional  equations  for  species  continuity  ana  chemical 


■eaction  '•ates. 


'he  partial  deferential  equations  of  continuity,  momentum,  energy  and  tn 


turbulent  quantities  represented  by  the  general  form  given  by  Eq.  29  are 


sowed  by  the  SIMPLE  algorithm  of  Ref.  13.  Details  of  the  solution  procedure 


may  be  found  in  several  other  references  also'"-”,  "he  d i sc'et  i  cat ; on 


equations  are  obtained  by  integrating  the  partial  differential  equations  over 


the  cell  control  /Oiumes  'ormed  aoout  .he  grid  lines  m  the  solution  domain. 
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lucid  explanation  of  its  advantages  over  other  differencing  methods  is  given 
Oy  Patankar*"'.  Suffice  to  state  that  the  procedure  ensures  conservation  of 
quantities  sucn  as  mass.  momentum  and  energy  over  any  grouo  of  control  volumes 
and  therefore,  over  the  whole  computational  domain.  The  pressure  field  is 
initially  guessed  and  it  is  corrected  at  eacn  iteration  stage  oy  means  of  a 
pressure  correction  equation.  A  staggered  grid  approach  and  a  central /upwind 
differencing  scheme  are  used  in  applyinq  the  equations;  the  advantages  of 
tnese  can  oe  found  in  Ref.  27.  A  line-relaxation  procedure  is  used  for  the 
solution  of  the  equations.  Convergence  is  improved  Oy  reliance  on 
under ->-e  1  axat  ion  factors  which  control  the  variation  of  dependent  variaoles 
from  iteration  to  iteration.  A  mesn  size  of  21x35  was  used  for  the  present 
calculations,  ’he  mesn  is  nonumformly  arranqed  in  order  to  provide  Detter 
resolution  m  regions  of  high  gradients  of  the  flow  variaoles. 

The  energy  equation  warrants  particular  mention.  The  compressible  form  of 
the  energy  equation  was  used  for  the  present  calculations  and  therefore, 
density  was  treated  as  a  /ariaole.  It  was  calculated  from  the  perfect  gas 
equat.on  of  state 

p  =  o  RT 

"h ; s  method  of  caicu.atinq  density  is  a  departure  'rom  the  previous  methods 
.n  which  the  density  is  calculated  using  density  correction  eauations.  'he 
present  procedure  makes  the  calculation  of  density  more  eiegant  and  straight 
'orwara.  variations  of  the  dynamic  viscosity  a  and  the  thermal  conduct...', 
x  with  temoerature  are  calculated  using  Sutherland’s  formulas  'or  viscosity 


and  thermal  conductivity,  'hev  are  given  Qelow. 


Two  methods  «fre  used  for  the  numerical  implementation  of  the  proceaure 
for  optaimnq  campressiDle  flow  solutions. 

The  steps  involved  in  the  first  method  is  illustrated  0y  means  of  the 
flow  diagram  given  in  Figure  <♦  and  may  Oe  summarized  as  follows: 

1.  Obtain  a  converged  solution  for  an  mcompress id le  flow  case  (Mach 
numoer  less  than  0.2). 

2.  Store  the  solution  vanaoles  on  restart  files  in  non-dimensional  form. 

3.  Increase  the  inlet  velocity  Oy  a  small  increment  and  repeat  the 
solution  procedure  usinq  variaoles  stored  in  the  non-dimensional  form  from  rn 
previous  solution  as  the  initial  guesses;  this  will  give  a  new  set  of 
non-dimensional  variaoles  to  be  stored  on  restart  files. 

h.  Repeat  steps  2  and  3  till  the  inlet  velocity  reacnes  the  desired  value 
in  the  subsonic  compressiOle  regime. 

It  should  De  noted  that  the  non-dimensional  form  of  the  variaoles  is 
□  articular  l  y  useful  for  their  usage  as  starting  values  m  the  solution 
procedure.  Since  the  solution  proceeds  in  steps  of  small  increments  of  the 
'low  variaoles*  faster  convergence  is  achieved,  'he  reason  'or  the  'aster 
convergence  mav  oe  due  to  the  'act  that  the  initial  guesses  'or  the  'low 
variaoies  are  close  to  the  true  solution,  'hus.  special  'ormu.at.ons  'or  the 
oensitv  ana  pressure  correction  equations  are  avotaea. 

'he  second  method  «as  oased  on  the  use  of  the  oer'ect  gas  eouation  of 
state  in  the  differential  'orm.  'he  oer'ect  gas  equation  of  state  mav  Oe 
0 1 f ferent i a  ted  to  ootain  an  expression  'or  the  density  change  in  terms  of 
oressure  ana  temperature,  'he  resulting  e«pression  is 
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(31) 


The  above  form  Mas  used  to  calculate  the  change  in  density  at  every  iteration 
stage.  The  new  density  Mas  then  calculated  by  adding  this  incremental  change 
to  the  old  value  of  the  density.  The  advantage  in  using  this  method  can  De 
seen  from  the  fact  that  the  expression  for  density  change  involves  the 
pressure  cnange  dp.  Therefore*  round-off  errors  may  Pe  smaller  if  this 
expression  is  used.  It  is  also  possible  to  control  the  change  in  density  from 
iteration  to  iteration  by  means  of  an  under-relaxation  factor  for  density.  The 
use  of  an  under-relaxat ion  factor  for  density  Mas  seen  to  improve  convergence. 


BOUNDARY  CONDITIONS 

In  the  SIMPLE  procedure  the  boundary  conditions  are  applied  by  modifying 
the  discretization  equations  for  the  boundary  cell  control  volumes.  The  no 
slip  condition  is  aoolied  for  the  velocities  at  the  solid  Malls;  at  the  axis 
of  symmetry  the  normal  derivatives  of  the  flOM  variables  except  the  radial 

velcitv  are  set  equal  to  zero.  The  radial  velocity  itself  must  be  set  equal  to 

zero  at  the  axis  of  symmetry  in  order  to  avoid  multiple  values  of  the  variable 

there.  The  present  code  (ECFLQU)  has  options  for  three  types  of  boundary 

conditions  for  the  energy  equation.  The  Diricnlet  boundary  condition  is  used 
'or  cases  Mhere  the  Mall  temoerature  is  soecifiea;  the  Neumann  sounaarv 
condition  is  useo  'or  adiabatic  Mail  cases  and  the  Rooom  boundary  condition 
is  jsed  for  cases  Mitn  prescribed  Mall  heat  flux.  The  boundary  conditions  'or 
the  x  and  the  t  equations  are  applied  by  means  of  Mall  func*  ops  Mhich  are 
used  to  avoid  the  use  of  extremely  fine  computational  mesh  near  the  Mall.  The 
rat;ona*e  'or  the  use  of  the  Mail  'unctions  is  given  bv  Chieng  and  ^aunder*. 
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RESULTS  AND  DISCUSSION 

Turbulence  Models 

Art  exhaustive  study  o f  turbulence  models  applicable  to  lot*  turbulence 
Reynolds  numoer  regions  and  recirculating  flow  regions  have  been  conducted. 
Models  proposed  by  other  investigators  as  well  as  modifications  appropriate  to 
the  present  problem  have  been  tried.  The  influence  of  the  various  terms  in  the 
turoulence  models  were  investigated  from  the  point  of  view  of  their  physical 
realism  and  their  ability  to  improve  predictions  of  the  flow  regimes 
encountered  in  combustion  chambers. 

The  present  study  was  conducted  with  the  primary  goal  of  predicting 
recirculating  flowfields  wmch  are  present  in  many  internal  flows  associated 
witn  propulsion  systems.  The  need  for  reexamining  the  turoulence  models  for 
this  type  of  flowfield  arises  from  the  fact  that  the  turbulence  models  rely 
heavily  on  empiricism.  One  severe  drawback  of  the  existing  turbulence  models 
is  that  they  have  been  tested  only  against  simple  flows  such  as  free  jets  and 
boundary- layers  for  which  experimental  data  existed  at  the  time  these  models 
were  developed.  The  difficulty  in  obtaining  turbulence  and  mean  flow  data  in 
recirculating  flowfields  is  well  recognized.  Hence  the  built-in  bias  in  the 
models  towards  satisfying  'ree-jet  flow  and  boundary- 1 aver  flow  phenomena. 

Reliaole  and  accurate  experimental  data  for  flowfields  with  high  levels  of 
turbulence  are  beginning  to  appear  in  literature*".  The  advances  in 
non- intrusive  optical  r'.ow  diagnostics  techniques  are  the  major  'eason  'or 
this  development.  The  present  studv  is  an  attempt  to  use  the  recently 
available  experimental  data  to  evaluate  the  turbulence  models  that 
are  currently  being  used,  modifications  are  suggested,  where  aooroortite.  to 
improve  the  oredictions. 

The  inviscid  core  that  is  present  at  the  entrance  of  a  sudden  oioe 
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expansion  is  a  reqion  of  low  turOulent  Reynolds  number.  However,  no  turbulence 
model  exists  to  adequately  treat  this  region.  Hanjelic  and  Launder  have 
soecifically  stated  that  their  low  turdulence  Reynolds  number  model  is  not 
suitaDle  for  free-shear  flows.  Attempt  was  made  in  the  present  study  to  obtain 
a  suitable  form  for  the  low  turbulence  Reynolds  number  model  that  can  be  used 
in  the  inviscid  core  region.  Hanjelic  and  Launder  used  the  term  f(  given  by 
Eq.  16  in  their  calculations.  However,  calculations  performed  with  the  sign 
changed  in  the  expression  (so  that  Ff  becomes  greater  than  1)  showed  better 
agreement  with  the  data  for  the  turbulence  energy  decay  along  the  center-line. 
This  difference  in  the  decay  rate  of  the  turbulence  energy,  as  compared  to  the 
decay  of  grid  turbulence  may  be  explained  on  the  grounds  that  a  region  of  high 
turbulence  surrounds  the  inviscid  core  and  it  is  likely  to  exert  significant 
influence  on  the  evolution  of  turbulence  within  the  inviscid  core.  The  effect 
of  the  influence  of  the  outer  region  on  the  flow  within  the  inviscid  core  may 
be  illustrated  with  the  help  of  the  sketches  given  in  Figure  5.  In  all  the 
three  cases  the  incoming  flow  is  assumed  to  be  uniform  (top-hat  shape)  with 
low  'evels  of  turbulence.  Case  (a)  is  a  free  jet  in  a  quiscent  medium.  Case 
'b)  is  the  flow  from  a  nole-in-a-disk  arrangement.  Case  <c)  is  the  flow  in  a 
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sudden  pipe  expansion. 

The  turbulence  models  that  can  be  found  in  the  literature  do  not  take  due 
account  of  the  influence  of  the  boundary  conditions  on  the  evolving  flow.  For 
examoie,  will  the  decay  of  turbulence  in  the  inviscid  core  region  be  the  same 
in  all  the  three  cases  illustrated  in  Figure  5?  The  present  study  ind. cates 
tnat  the  presence  of  the  boundaries  must  be  taken  into  consideration,  not  just 
as  a  local  influence,  but  in  a  more  global  manner. 

The  streamline  curvature  modifications  o^  Leschziner  and  Rodi  did  not 
improve  the  predictions  in  the  recirculating  flow  region.  The  reason  for  this 
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behavior  nay  lie  in  the  fact  that  many  sweeping  assumptions  were  made  in 


formulating  this  model.  Qmittinq  the  term  U,-/r  without  sound  justification  is 
one  example  where  the  assumptions  are  not  based  on  valid  argument.  However , 
when  this  term  was  included  in  the  calculations*  it  was  seen  that  the  solution 
did  not  converge. 

The  present  study  is  inconclusive  as  far  as  the  modifications  to  the 
turbulence  models  are  concerned.  Even  though  it  has  been  established  that  the 
existing  models  are  not  adequate  to  treat  turbulence  in  recirculating  flows* 
certain  general  directions  towards  improving  these  models  can  be  suggested 
based  on  the  present  study.  A  definite  form  for  the  improved  model  with  the 
values  of  the  empirical  constants  requires  much  further  study,  (lore 
experimental  data  on  highly  turbulent  recirculating  flows  are  immediately 
needed  to  correlate  the  models  with  experiments. 

Compressible  Flow  Calculations 

Some  results  from  a  compressible  flow  case  with  a  nominal  (inlet)  velocity 
of  150  m/s  are  presented  in  Figures  6-8.  The  static  temperature  of  the  air  at 
the  inlet  for  this  case  was  300  «K.  The  temperature  boundary  conditions  used 
for  this  case  are  insulated  side  (East)  wall  and  constant  temperature 
top  (North)  wall.  Therefore*  the  temperature  contours  in  this  case  resulted 
solely  from  compressibility  effects.  Contour  plots  of  vorticity,  temperature 
and  turbulent  kinetic  energy  are  shown  in  these  figures.  All  the  plots  are 
given  in  the  non-dimensional  form  by  using  appropriate  non-dimensional izing 
parameters . 

The  vorticity  contours  in  Figure  6  are  clustered  near  the  entrance  around 
the  step  where  the  diameter  changes  from  the  smaller  to  the  larger.  Physically 
this  region  represents  the  boundary  region  between  the  inviscid  core  and  the 
recirculation  region.  It  is  interesting  to  note  that  the  recirculation  region 


is  on*  of  low  vorticity;  therefor*,  this  region  behaves  like  a  free  vortex. 

The  tamper ature  contours  are  shown  in  Figure  7.  The  high  temperature 
region  lies  downstream  of  the  recirculation  region  and  it  can  be  seen  that  the 
rise  in  temperature  in  this  region  is  caused  by  the  deceleration  of  the  flow 
because  of  the  expansion  and  the  resulting  rise  in  static  temperature.  There 
exists  a  large  region  close  to  sudden  expansion  plane  where  the  temperature  is 
more  or  less  uniform.  This  rapid  attainment  of  uniformity  in  temperature  is 
encouraging  because  it  is  one  of  the  qualities  that  one  looks  for  in  a 
combustor.  However,  it  should  be  cautioned  that  the  temperature  distribution 
in  a  reacting  flow  will  depend  also  an  the  fuel-air  distribution,  and 
therefore,  on  the  location  and  conf iguration  of  the  fuel  injectors.  Another 
factor  that  will  become  important  while  considering  temperature  distribution 
in  reacting  flows  is  the  wall  boundary  condition.  As  the  heat  transfer  to  the 
wall  increases,  it  is  expected  that  the  region  of  uniform  temperature  seen  in 
Figure  7  will  shrink  in  size  and  move  towards  the  center  of  the  chamber. 

The  contours  of  turbulent  kinetic  energy  are  shown  in  Figure  9.  Its 
maximum  is  seen  to  be  at  a  downstream  distance  of  about  one  diameter. 

Radially,  the  maximum  occurs  at  the  same  distance  as  the  smaller  diameter  of 
the  inlet.  Approximately  this  is  the  region  where  the  expanding  forward  flow 
region  and  the  rec lrculat ion  region  meet.  Therefore,  this  constitutes  the 
shear  layer  and  it  is  natural  to  expect  the  highest  levels  of  turbulence  to 
occur  in  this  region.  The  usefulness  of  the  contour  plots  of  the  flow 
parameters  to  a  designer  can  be  easily  seen  from  this  figure.  For  the  fuel  air 
to  mix  to  the  maximum  extent  the  fuel  must  enter  the  chamber  from  the 


periphery  of  the  inlet. 


CONCLUSIONS 


The  present  study  has  resulted  in  a  computer  code  capable  of  predicting 
recirculating  compressible  flow  in  axisymmetric  ducts.  Some  of  the 
deficiencies  of  the  existing  turbulence  models  are  identified  in  the  present 
study  and  modifications  are  suggested.  Very  useful  information  from  the 
compressible  flow  solution  that  could  be  of  direct  use  to  the  designer  is 
obtained  from  the  present  study. 

In  addition  to  improving'  the  fluid  dynamic  model »  several  coding 
improvements  were  implemented ■  same  of  which  are  discussed  below. 

The  computer  code  was  extensively  modified  to  make  input  and  output  more 
efficient.  Presently  all  the  data  are  input  using  a  separate  input  file  rather 
than  specifying  them  within  the  program  by  means  of  source  statements.  This 
has  made  it  possible  to  reduce  the  number  of  compilations  necessary  while 
conducting  parametric  study  to  see  the  influence  of  the  various  parameters  in 
the  governing  equations.  Another  significant  modification  that  was 
incorporated  into  the  program  is  the  provision  for  temporary  storage  and 
retrieval.  This  feature  is  very  useful  when  the  compressible  flow  equations 
are  being  solved. 

While  the  program  was  being  tested  it  was  noticed  that  it  took 
several  iterations  for  some  of  the  residual  source  sums  to  attain  values  below 
the  ones  specified  as  convergence  criteria.  As  a  remedy  the  use  of  double 
precision  arithmetic  was  tried  and  this  resulted  in  convergence  with  less 
number  of  iterations.  All  the  calculations  in  the  program  presently  use  double 
precision  arithmetic.  It  is  felt  that  as  the  complexity  of  the  calculations 
increase  as  a  result  of  additional  eguations  that  must  be  solved  while  solving 
more  complex  flowfields.  double  precision  arithmetic  will  become  essential  in 
order  to  preserve  accuracy. 

All  the  modifications  to  the  program  has  been  profusely  documented 
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internally  with  the  help  of  comment  statements  in  order  to  aid  other  users  in 
getting  easily  acquainted  with  the  program.  Other  users  can  now  run  the 
program  with  a  minimum  investment  of  their  time.  The  extensive  internal 
documentation  also  facilitates  future  changes  with  little  effort.  Thus, 
calculations  with  a  different  chemical  species  arising,  for  example,  from  the 
use  of  fuel-air  mixture,  is  straight  forward  and  easy  to  implement.  Or,  as 
another  example,  a  different  turbulence  model  may  be  attempted  by 
incorporating  it  as  another  option. 
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APPENDIX 


Th«  governing  equations  for  the  conservation  of  mss*  eornentucr*  energy*  the 
turbulent  kinetic  angery  and  the  energy  dissipation  rate  can  be  cast  In  the 
general  form: 

r  (eur*)  *  h  •  h  <t*  -  h (rr*  0) 

where  stands  for  the  variables  shown  In  the  table.  The  forms  for  the  source 

term  are  also  given  In  the  table. 

Table  1.  The  Form  of  the  Source  Term  In  the  General 
Equation  for  4  (Eq.  (1)) 
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The  quantities  $u»  Sv  and  G  appearing  In  the  source  terms  have  the 
following  meaning. 
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Paavo  Seprl  and  Baek  Youn 
ABSTRACT 

Attention  Is  focused  on  che  computational  predictability  of  turbulent 
boundary  layers  influenced  by  free  stream  turbulence  (FST).  One  practical 
application  lies  in  the  area  of  improving  turbine  blade  performance  and 
enhancing  the  attendant  lifespan.  The  approach  herein  has  consisted  of 
further  scrutiny  of  recently  published  data.  Improved  modeling  of  turbulent 
fluxes,  and  computations  with  the  code  STANCOOL.  Four  novel  results  have  been 
achieved  which  are  presented  for  the  first  time  in  this  report.  First,  an 
analytical  representation  Is  proposed  which  Is  shown  to  approximate  well  the 
mean  profiles  of  velocity  and  temperature  throughout  a  turbulent  boundary 
layer.  A  triple-deck  exponential  function  Is  demonstrated  to  approximate 
laminar  as  well  as  turbulent  profiles  by  appropriate  changes  of  the 
parameters.  FST  effects  are  Incorporated  into  the  model  by  explicit 
variations  In  the  coefficients.  Second,  through  observations  and  fitting  of 
data,  the  turbulent  boundary  layer  Is  shown  to  be  coitposed  of  three  layers, 
for  which  length  scales  are  proposed  In  a  preliminary  fashion.  Third,  by  use 
of  the  observed  triple  exponential,  a  novel  1 ntegro-differentlal  model  is 
proposed  for  the  Reynolds  stress  and  turbulent  heat  flux  terms.  Fourth,  a 
remarkable  analytical  solution  Is  found  to  describe  a  turbulent  boundary  layer 
for  the  case  of  a  particular  form  for  the  Reynolds  stress.  Analytical 
expressions  are  derived  for  the  turbulent  Prandtl  number  profile  for  two 
limiting  cases.  Modifications  of  and  computations  with  the  code,  STANCOOL, 
demonstrate  Improved  agreement  with  available  data  for  the  case  of  a  flat 
plate. 
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1.0  INTRODUCTION 


1.1  Background 

The  transport  of  mass,  momentum,  and  energy  across  turbulent  boundary 
layers  Is  a  subject  that  Is  rich  in  practical  application,  and  consequently 
it  has  received  considerable  attention  In  several  disciplines  of  science  and 
engineering.  The  present  investigation  has  been  motivated  primarily  by  the 
continuing  need  for  improvements  in  computational  tools  used  for  predicting 
heat  transfer  in  the  complicated  aerothermal  environment  of  turbine  engines. 
Improvements  In  state-of-the-art  engine  design  and  efficiency  will  rely 
increasingly  on  coiqputer  codes  which  can  predict  alterations  In  performance 
and  turbine  blade  coo’ing  requirements  under  adverse  thermal  conditions.  One 
goal  is  to  Increase  the  lifespan  of  turbine  blades  while  minimizing  the 
auxiliary  power  needed  to  cool  the  components  effectively.  For  this  purpose 
it  Is  necessary  to  have  accurate  knowledge  of  heating  distributions  on  the 
blade  surfaces  under  varying  operating  conditions. 

The  present  investigation  is  in  continuation  of  the  work  initiated  in 
1984  by  P.  Sepri  under  the  USAF-SCEEE  Summer  Faculty  Research  Program,  which 
was  conducted  at  the  Aero-Propul slon  Laboratory  at  Wright-Patterson  Air  Force 
Base.  The  final  report  [1]  for  that  research,  and  the  ensuing  proposal  [2] 
for  the  present  study,  may  serve  as  additional  background  references.  The 
particular  Issue  under  investigation  concerns  the  increase  in  heat  transfer 
that  is  observed  to  occur  in  turbulent  boundary  layers  which  are  subjected  to 
elevated  levels  of  free  stream  turbulence  (FST).  Clearly,  the  gaseous  flow 
around  turbine  blades  contains  a  high  degree  of  FST  owing  to  the  high  mass 
flux  which  is  forced  through  confined  spaces  obstructed  by  a  sequence  of 
engine  components.  The  actual  flow  in  the  engine  is  further  complicated  by 
several  factors,  among  wh'ch  are:  three  dimensional  mean  flow,  rotational 


effects,  non-equilibrium  turbulence,  transonic  flow  effects,  corner  flow 
interactions,  strong  acoustic  coupling,  and  possibly  incomplete  combustion 
which  influences  fluid  transport  properties  as  well  as  temperature 
distributions.  Despite  the  best  of  attempts,  it  is  currently  not  possible  to 
claim  a  computational  capability  which  addresses  all  of  these  factors 
simultaneously  and  accurately. 

Recent  descriptions  of  FST  effects  on  the  structure  of  heated  turbulent 
boundary  layers  have  been  reported  by  Slmonich  and  Bradshaw  [3],  Bayley  and 
Priddy  [4],  and  Pedislus,  et  al.  [5].  Additional  background  material  may  be 
obtained  from  References  [6-14].  In  the  present  report  considerable  reference 
is  made  to  the  excellent  experimental  data  published  in  the  past  few  years  by 
Blair  [15-21].  His  measurements  Include  extensive  turbulence  statistics  and 
profiles  in  the  boundary  layer  adjacent  to  a  heated  flat  plate,  for  which  the 
FST  is  varied  parametrically.  One  of  the  objectives  of  Blair's 
experimentation  has  been  to  produce  a  detailed  and  reliable  characterization 
of  FST  effects  on  boundary  layers  of  a  fundamental  type  which  may  help  in 
understanding  the  actual  turbine  flow  environment. 

With  the  availability  of  Blair's  data,  it  has  been  of  interest  to  compare 
his  results  with  predictions  from  computer  codes.  Among  the  many  codes 
developed  in  the  industry  for  the  purpose  of  calculating  turbulent  boundary 
layers  [22],  the  one  utilized  for  this  investigation  is  STANCOOL,  which  is  a 
modified  version  of  STANS  [23,24]  developed  by  Crawford  and  Kays.  This  code, 
as  well  as  many  others,  introduces  a  turbulent  Prandtl  number  profile 
throughout  the  boundary  layer,  through  which  turbulent  heat  transport  is 
likened  to  the  relatively  more  studied  momentum  transport  in  the  manner  of  the 
Reynolds  analogy.  The  deviation  in  the  Reynolds  analogy  is  often  described  at 
a  solid  surface  by  the  local  ratio  of  Stanton  number  to  half  of  the  skin 


friction  coefficient,  2S$/Cf,  which  Is  termed  the  Reynolds  analogy  factor, 
with  unity  denoting  a  perfect  analogy.  Earlier  Investigations  [10-14]  have 
conflicted  In  their  reports  of  the  dependence  of  turbulent  heating  on  the 
level  of  FST,  some  even  claiming  no  effect.  More  recent  data  [3-5,18]  Indicate 
that  the  Reynolds  analogy  factor  Increases  with  Increasing  FST  Intensity. 

Upon  the  availability  of  Blair's  data,  MacArthur  [25]  undertook  a 
preliminary  evaluation  of  the  predictive  capability  of  two  options  In 
STANC00L.  These  options  are  comprised  of  a  standard  mixing  length  model  and  a 
model  Incorporating  the  turbulence  kinetic  energy  equation  [23].  Although  the 
coiqparlsons  yielded  favorable  results  in  come' cases,  significant  departures 
were  noted  In  other  cases  In  two  respects;  namely,  the  onset  and  duration  of 
transition  and  the  level  of  heating  with  Increasing  FST.  Unexpectedly, 
MacArthur's  comparisons  revealed  that  occasionally  the  two  computational 
options  agreed  with  each  other  better  than  either  did  with  the  data.  While 
the  mixing  length  model  does  not  provide  for  a  mechanism  for  FST  effects.  It 
was  anticipated  that  the  kinetic  energy  option  would  introduce  these  effects 
through  the  external  boundary  condition.  MacArthur' s  observations  are  also 
supported  by  the  work  of  Wlnstanley,  et  al .  [26]. 

Seprl  and  Ebert  [1]  continued  MacArthur's  Initiative  with  the  objective 
of  seeking  a  turbulence  model  that  reflects  an  improved  prediction  of  FST 
Influence  on  turbulent  transport  through  the  boundary  layer.  A  preliminary 
turbulence  model  based  on  the  work  of  Miyazaki  and  Sparrow  [27]  was  utilized 
with  the  result  of  improved  comparison  with  Blair's  data.  During  the  course 
of  Investigation,  novel  observations  were  made  concerning  an  exponential  wake 
structure  In  the  turbulent  boundary  layer,  which  appeared  only  at  the  higher 
levels  of  FST. 

Although  the  results  reported  by  Seprl  and  Ebert  were  promising,  the 

33.6 


VtWWi 


preliminary  model  was  clearly  an  oversimplification  of  a  complicated 
phenomenon.  With  only  one  adjustable  parameter  In  the  Reynolds  stress.  It  was 
not  possible  to  obtain  simultaneously  a  good  match  of  the  mean  velocity 
profile  as  well  as  the  skin  friction  variation  along  the  wall.  It  became 
clear  that  the  FST  Influenced  both  the  wake  region  and  the  wall  region  In 
separate  ways.  These  results  and  observations  have  lead  to  the  present 
Investigation,  In  which  further  Improvements  are  sought. 

1.2  Objectives 

With  the  observation  that  FST  Influences  the  wall  region  as  well  as  the 
wake  region.  It  has  been  proposed  [2]  to  extend  the  preliminary  model  to 
account  for  effects  which  were  Initially  excluded.  The  study  was  to  Include 
five  objectives,  which  have  been  addressed  In  phases. 

First,  reconsideration  of  the  FST  model  used  In  1984  has  suggested  a 
refinement  based  on  the  observation  that  Inclusion  of  the  transverse  velocity 
at  the  edge  of  the  boundary  layer,  ve,  would  alter  slightly  two  of  the 
coefficients  previously  utilized  In  the  model.  Furthermore,  a  third 
coefficient  would  be  Introduced  which  would  alter  the  Reynolds  stress  model  in 
the  wall  region,  as  desired.  The  first  objective  has  been  to  analyze  this 
extended  version  of  the  mixing  length  model. 

The  second  objective  has  consisted  of  further  analysis  of  the  exponential 
wake  decay  which  was  first  observed  In  the  1984  Investigation.  It  was  evident 
from  Blair's  data  [18]  that  the  trigonometric  wake  function  proposed  by  Coles 
[28]  ceases  to  be  an  adequate  representation  of  a  turbulent  boundary  layer 
which  Is  subjected  to  high  levels  of  FST.  However,  the  exponential  function 
[1]  serves  very  well  under  these  conditions.  It  has  been  proposed  [2]  to 
analyze  the  turbulent  boundary  layer  as  being  a  composite  structure  consisting 


of  the  exponential  wake  and  a  wall  region,  for  which  the  functional 
description  would  be  studied  from  Blair's  data.  In  fact,  It  was  suggested  [2] 
that  the  turbulent  boundary  layer  might  consist  of  three  layers,  of  which  the 
outermost  would  comprise  the  decay  Into  the  free  stream.  In  the  present 
Investigation  It  has  emerged  that  the  turbulent  boundary  layer  Indeed  exhibits 
three  layers.  In  which  different  physical  mechanisms  dominate. 

The  third  objective  has  been  to  consider  a  simpler  limiting  case  of  the 
turbulent  boundary  layer  with  the  hope  of  understanding  better  the  mechanisms 
of  transfer  and  to  simplify  the  modeling  of  turbulent  transport.  The  case  of 
a  uniform  suction  turbulent  boundary  layer  has  been  suggested  [2]  for  this 
purpose.  In  which  all  spatial  dependences  would  occur  In  the  transverse 
dimension  (y)  only.  In  this  case  all  of  the  describing  equations  may  be 
Integrated  once  with  no  additional  approximations  required.  The  resulting 
equations  describe  flux  relations  explicitly,  among  which  are  the  Reynolds 
stress  and  turbulent  heat  transfer  terms.  This  objective  has  been  met  herein 
as  a  special  case  of  a  more  general  formulation. 

The  fourth  objective  has  been  to  consider  the  energy  equation  In  parallel 
with  the  momentim  equation,  with  the  Intention  of  modeling  the  turbulent 
Prandtl  nunber  profile  In  the  boundary  layer.  In  this  connection  It  was 
observed  in  Blair's  data  that  his  values  for  PP^  declined  rapidly  at  the 
boundary  layer  edge.  An  explanation  was  offered  by  Seprl  and  Ebert  [1]  In 
terms  of  channel  flow  contamination  of  the  measurements.  Another  goal  of  the 
present  Investigation  has  been  to  search  the  literature  for  other  evidence  (or 
lack  thereof)  of  such  a  decline  In  Pr*.  Along  with  this  task.  It  has  been  an 
objective  to  propose  a  model  for  the  Pr^  profile  which  accounts  for  variations 
In  FST. 

The  fifth  objective  has  comprised  of  comparisons  between  updated  mixing 
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length  models  in  the  code  STANCOOL  and  Blair's  data.  Here,  the  hope  has  been 
that  the  effects  of  FST  could  be  Incorporated  into  an  accurate,  yet  simple, 
model  for  the  purpose  of  predicting  the  evolution  of  skin  friction,  heat 
transfer,  and  mean  profiles  in  a  turbulent  boundary  layer  over  a  flat  plate. 
Such  a  model  has  emerged  from  this  investigation,  and  the  comparison  with  the 
data  is  favorable. 


1.3  Content 


In  order  to  meet  the  objectives,  the  investigation  has  proceeded  in 
several  phases.  As  an  end  result,  three  conclusions  and  descriptions  have 
emerged  which  are  in  addition  to  the  original  objectives.  These  are:  an 
analytical  description  which  approximates  the  profiles  of  mean  velocity  and 
mean  temperature  throughout  the  turbulent  boundary  layer,  an  analytical 
solution  to  the  turbulent  boundary  layer  for  a  special  Reynolds  stress 
distribution,  and  a  general  formulation  of  Reynolds  stress  and  turbulent  heat 
transfer  in  terms  of  mean  profiles.  This  last  formulation  does  require 
additional  closure  assumptions,  which  are  suggested  for  the  present  problem. 

The  first  phase  of  investigation  has  consisted  of  further  scrutiny  of 
31air's  data  with  the  objective  of  characterization  of  the  wall  layer  so  that 
the  two  layer  modeling  could  commence.  The  details  will  be  described  later, 
but  in  essence  Blair's  data  have  revealed  the  existence  of  further  exponential 
layers  within  the  boundary  layer.  Including  the  approach  to  the  wall  itself. 
These  observations  have  been  modeled  in  an  analytical  functional 
representation.  The  character  of  the  exponential  layers  is  seen  to  change 
explicitly  with  the  variation  of  FST.  The  whole  layer  formula  for  the 
turbulent  boundary  layer  is  presented  for  the  first  time  herein,  and  it  is 
believed  to  be  the  most  accurate  representation  of  this  kind  yet  achieved. 
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The  exponential  characterization  of  the  mean  profiles  provides  a  direct 
means  for  modeling  the  Reynolds  stress  and  turbulent  heat  transfer  terms. 
Formal  integrations  of  the  momentum  and  energy  equations  yield  formulas  for 
these  turbulent  fluxes,  as  detailed  in  the  subsequent  section.  Additional 
independent  closure  relations  are  required  to  complete  the  modeling,  but  these 
are  directly  observable  from  Blair's  data. 

After  having  achieved  a  formal  relationship  between  the  turbulent  fluxes 
and  the  mean  profiles,  it  has  become  apparent  that  a  particular  analytical 
solution  may  be  obtained  among  the  variables.  This  solution  exists  provided 
the  Reynolds  stress  and  the  turbulent  Prandtl  number  take  on  specific  shapes, 
which  incidentally,  are  not  unreasonable.  There  are  two  primary  benefits 
obtained  from  this  analytical  solution.  First,  it  serves  as  an  excellent 
check  for  any  code  such  as  STANCOQt.  By  altering  only  a  few  statements  in 
subroutine  AUX,  the  code  may  be  run  and  checked  against  the  analytical 
solution  for  the  purpose  of  code  verification.  Second,  the  analytical 
solution  displays  explicitly  the  interrelationships  among  the  various  physical 
mechanisms  at  work  in  the  turbulent  boundary  layer.  In  this  sense,  this 
analytical  test  solution  serves  a  better  function  than  does  the  originally 
proposed  suction  boundary  layer.  Here,  the  boundary  layer  grows  in  the 
downstream  direction,  and  no  artificial  suction  boundary  condition  is 
required.  In  addition,  it  is  noted  that  no  analytical  solution  is  available 
for  either  the  laminar  boundary  layer  as  described  by  the  Blasius  Equation  or 
for  the  actual  turbulent  boundary  layer.  However,  the  analytical  test  case 
forms  a  remarkable  middle  ground  between  the  two  real  flows. 

Through  analysis  of  the  energy  equation  in  parallel  with  the  momentum 
equation,  a  formulation  of  Prt  has  been  achieved  which  may  be  used  for  more 
general  applications.  8y  considering  limiting  forms  of  this  formulation,  a 
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model  is  proposed  for  comparison  with  Blair's  data.  It  Is  clear  from  the 
relationships  that  Pr^  modeling  in  general  can  not  be  as  simple  as  is  often 
assumed  in  local  gradient  models.  The  results  of  Prt  discussions  in  several 
references  are  summarized. 

The  last  part  of  the  present  investigation  involves  comparisons  of  the 
latest  STANCOOL  computations  with  Blair's  data  for  the  case  of  vanishing 
pressure  gradient.  Recommendations  are  presented  for  further  investigation. 


2.0  FORMULATION 


I 


■ri. 


2.1  Describing  Equations 


The  basic  equations  utilized  for  the  computation  of  a  turbulent  boundary 


layer  will  be  listed  here  as  a  beginning  point  for  the  discussion.  The 


initial  equations  will  be  of  sufficient  generality  to  describe  many  boundary 


layer  flows,  while  it  is  not  considered  appropriate  to  begin  with  complete 


generality.  The  equations  listed  here  correspond  to  the  ones  utilized  in 


STANCOOL,  and  the  notation  is  standard  although  it  differs  somewhat  from  that 


which  is  used  by  Crawford  and  Kays  in  regard  to  enthalpy.  In  dealing  with 


gaseous  boundary  layers  which  Involve  significant  heat  transfer  it  is 


important  to  account  for  density  variations  throughout  the  boundary  layer,  and 


secondly  to  recognize  that  molecular  transport  coefficients  depend  on  the 


local  temperature.  For  turbulent  boundary  layers,  the  possibility  of 


significant  density  fluctuations  raises  the  unfortunate  complexity  of 


additional  correlations  Involving  this  density.  There  are  two  accepted  ways 


to  treat  the  density  variations;  one  is  explicit,  and  the  other  is  to  use  a 


mass  averaged  velocity  decomposition,  as  has  been  introduced  by  Favre  [29]. 


In  accordance  with  the  assumptions  listed  in  the  next  section,  the 


conservation  of  mass  equation  may  be  expressed  as  follows  in  the  explicit 


method: 


3^  K  *  a  0 


Here,  the  subscript,  k,  denotes  the  Einstein  summation  convention,  and  the 


angled  brackets  denote  the  averaging  process  resulting  in  correlations  between 


the  density  fluctuations  and  the  velocity  fluctuations.  The  other  variables. 


without  the  brackets,  are  understood  to  represent  mean  profiles.  Since  the 
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explicit  averaging  process  Introduces  additional  unknown  density  correlations 
(although  they  may  in  fact  be  negligible  In  some  cases),  the  Favre  type 
averaging  results  in  less  cumbersome  expressions.  Here,  we  define  two  new 
variables  as  fol lows: 

m(t,x)  *  pu(t,x)  (2) 

n(t,x)  =  pv(t,x)  (3) 

The  averaging  process  applied  to  the  product  form  yields  an  alternative 
expression  for  the  conservation  of  mass  equation: 

i  M  *  (")  ■  o  (4) 

Here,  the  fluctuation  averages  vanish  by  construction: 

<m‘ >  *  0  =  <n' >  (5) 

Of  course,  the  formalism  still  must  retain  the  identities: 

m*pu+<p‘u'>  (6) 

n  *  Pv  +  <PV>  (7) 

By  utilization  of  mass  averaging,  the  streamwise  momentum  equation  in  the 
boundary  layer  is: 

>7  <">  *  37  <"“>  *  37  <">  ■  57  W57>  -  <"v>>  <8> 

Here,  additional  assumptions  have  been  made  as  listed  in  the  next  section. 

Tie  mass  averaged  Reynolds  stress  term  is  <n'u’>.  In  this  boundary  layer 
formulation,  the  momentum  equation  transverse  to  the  plane  of  the  wall  reduces 
to  the  statement  that  the  mean  pressure  varies  only  in  the  streamwise 
direction,  and  is  prescribed  by  the  flow  external  to  the  boundary  layer.  The 
equation  for  total  energy,  written  in  terms  of  stagnation  enthalpy,  H,  is 
expressed  in  the  boundary  layer  as: 


where: 


uC 

7 


(molecular  Prandtl  number) 


H  ■  h  ♦  y  (u)2 

<n‘H‘>  «  Cp<n'T'>  +  u<n'u‘> 

5  ■  (1  -  V)  4  (»)2) 

It  is  also  appropriate  to  record  the  thermal  energy  equation  which  is  obtained 
by  subtraction  of  the  kinetic  energy  from  the  total  energy  equation.  There 
resul ts: 

17  («Pr'  *  57  <"V>  ■  57  1"  57  (T)  -  cp‘"'r>  *  •>  (10) 

where:  ♦  denotes  the  viscous  dissipation. 

Finally,  the  equation  of  state  for  the  gaseous  flow  is  assumed  to  apply: 

P  »  oRT  (II) 


2.2  Assumptions 

For  the  sake  of  completeness,  the  major  assumptions  inhe-ent  in  the  above 
formulation  will  De  recorded  here. 

(1)  The  turbulence  is  in  steady  state  so  that  its  statistics  are 
stationary. 

(2)  The  flow  is  statistically  two  dimensional  so  that  there  are  no 
variations  in  the  spanwise  (z)  direction.  Furthermore,  there  is  no  mean  flow 
in  the  spanwise  direction. 

(3)  The  standard  boundary  layer  assumptions  are  Invoked  so  that  second 
derivatives  in  the  x  direction  are  neglected  in  comparison  to  those  in  the  y 
di rection. 
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(4)  All  terns  in  the  y  momenta*  equation  are  negleglble  so  that  the 
pressure  varies  only  In  the  x  direction,  to  this  order  of  approximation. 

(5)  The  turbulent  boundary  layer  Is  sufficiently  near  an  equilibria* 
condition  so  that  variations  In  turbulence  structure  In  the  x  direction  are 
negligible  compared  to  those  In  the  y  direction. 

(6)  The  velocity  field  Is  approximately  solenoldal  so  that  terms 
involving  the  second  coefficient  of  viscosity  In  the  momenta*  equation  are 
negl Iglble. 

(7)  Gravitational  effects  are  negligible. 

Later  in  the  present  investigation,  the  following  additional  assanptions 
will  be  empl oyed: 

(8)  Density  variations  produce  effects  of  secondary  Importance  In  the 
momenta*  equation. 

(9)  Thermal  energy  terms  dominate  the  energy  equation  for  the  cases  of 
interest.  The  flows  under  consideration  here  are  low  Mach  nanber  flows  with 
relatively  moderate  heat  transfer.  In  approximation,  the  contributions  of 
turbulence  kinetic  energy,  mean  kinetic  energy,  and  viscous  dissipation  are 
small  In  conparlson  to  the  thermal  component.  This  Is  not  to  say  that  these 
energies  are  negligible  in  other  equations  of  the  hierarchy.  For  the  sake  of 
concreteness,  the  following  typical  magnitudes  are  noted: 
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(9)  Although  T  and  o'  are  significant  In  this  problem  their 
contributions  to  the  averaged  Ideal  gas  equation  are  negligible: 

p  *  oRT  where 
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(10)  The  boundary  layer  In  this  Investigation  will  be  over  a  flat  plate 


so  that  the  pressure  gradient  vanishes. 

2.3  Derivations 

The  equations  listed  previously  suffer  from  the  usual  closure  problem 
well  known  In  the  study  of  turbulence.  Although  there  Is  an  Infinity  of 
correlations  that  might  be  considered,  the  ones  of  Immediate  concern  are  the 
lowest  order  ones  appearing  In  the  momentun  and  energy  equations;  namely, 
<n'u'>  and  <n'Tl>.  The  momentun  equation  may  be  viewed  as  determining  the 
evolution  of  the  mean  velocity  field,  provided  the  mean  pressure,  density  and 
the  Reynolds  stress  are  supplied  from  other  Independent  relations.  Of  course 
proper  boundary  conditions  also  must  be  Included  In  the  solution  procedure. 
Parallel  statements  may  be  made  for  the  temperature  field  and  the  energy 
equation.  The  approach  taken  here  will  be  to  Integrate  Eqs.  (8)  and  (9) 
formally  to  obtain  explicit  relations  for  the  turbulent  fluxes  in  terms  of 
integrals  and  derivatives  of  the  mean  variables.  This  procedure  does  not 
constitute  a  closure  scheme  by  Itself,  but  It  does  provide  a  description  of 
the  unknown  fluxes  whenever  the  mean  profiles  can  be  accurately  obtained  from 
experiments,  say.  The  method  can  be  extended  Into  a  closure  scheme,  as 
discussed  later.  If  appropriate  additional  Information  Is  inserted  Into  the 
integrals  of  the  mean  profiles.  It  Is  believed  that  this  closure  method  is 
introduced  for  the  first  time  herein,  although  basic  integral  relations  have 
appeared  earlier  [39]. 

Before  embarking  on  the  new  approach.  It  Is  useful  to  mention  the  method 
used  In  the  traditional  mixing  length  hypothesis,  which  Is  also  the  first 
option  provided  in  STANC001.  Closure  of  the  basic  equations  Is  effected  by 
the  following  additional  model: 


33.16 


*  * 


-•-■i-.' •->>[ 


where: 


» 

i 


§ 

% 


& 


* 

p. 

«.  V 
►  V 

•V 

>.v. 

■  V 


<u‘v‘>  « 

3U 

cm  3 y 

(12) 

<v'T‘>  • 

aT 

(13) 

eH  ay 

«m  *  t2  1 

l-l 

ay1 

(14) 

The  turbulent  Prandtl  number  Is  introduced  as  the  ratio: 
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With  these  relations  the  system  of  equations  becomes  closed,  provided  the 
mixing  length,  t,  and  Prt  are  specified  throughout  the  boundary  layer.  Of 
course,  the  closure  problem  has  simply  been  shifted  to  the  specification  of 
these  alternative  unknown  functions.  However,  several  heuristic  arguments  may 
be  Introduced  which  describe  these  variations  in  approximate  ways.  The 
objective  of  the  present  investigation  is  to  seek  formulations  of  and  Prt 
which  take  Into  account  the  effects  of  FST. 

The  first  step  in  the  present  method  consists  of  a  formal  Integration  of 
the  momentun  (Eq.  (8)  and  Eq.  (4))  from  the  wall  to  an  arbitrary  location  in 
the  boundary  layer.  There  results: 


y  y 

<nV>  *  uuy  -  rw  -  ufnw  -  /  mxdc)  -  /  (mu)xd£  -  pxy  (16) 

0  o 

In  this  equation  the  subscripts  x,y  refer  to  partial  differentiation  In  these 
directions  respectively,  and  the  subscript  w  refers  to  evaluation  at  the  wall. 
Here,  is  the  local  shear  stress  at  the  wall,  and  nw  Is  the  local 
transpiration  rate  at  the  wall,  which  vanishes  for  an  Impermeable  surface. 
Furthermore,  px  denotes  the  Imposed  pressure  gradient,  which  vanishes  for  the 
case  of  a  flat  plate  in  the  absence  of  external  influences.  For  the  present 
investigation,  the  case  of  the  flat  plate  will  be  assumed  henceforth,  and  the 
plate  will  also  be  taken  to  be  Impermeable,  although  these  restrictions  pose 
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no  difficulty  If  generalization  1$  desired.  The  physical  1 nterpretatlon  of 
Eq.  (16)  Is  worth  mentioning:  the  various  tenes  represent  the  several 
mechanisms  for  momenta*  fl ux .  The  constant  of  Integration,  r„,  obtained  from 
evaluation  at  the  wall,  may  be  viewed  as  the  net  effect  of  momenta*  transfer 
resulting  from  the  other  terms.  The  equation  may  also  be  interpreted  as  a 
limiting  form  of  the  control  volume  approach.  In  which  the  change  In 
streamwlse  women tun  flux  Is  evaluated  across  two  transverse  surfaces  that  are 
Infinitesimally  separated  in  x.  The  term  Involving  nw  describes  the  change  In 
momenta*  by  vertical  convection  through  the  top  surface  and  also  the  wall  In 
cases  of  nonvanishing  transpiration.  The  Reynolds  stress  term  and  the 
molecular  viscosity  term  represent  the  transfer  of  momenta*  through  shearing 
action  via  turbulent  and  molecular  motions  respectively.  Lastly,  boundary 
layers  with  Impressed  pressure  gradients  will  undergo  a  change  In  momenta* 
flux  as  a  result  of  the  strea*»*1se  variation  of  pressure  applied  to  the 
transverse  control  surfaces.  It  Is  Important  to  note  the  satisfaction  of  the 
two  limits  of  Eq.  (16);  namely,  at  the  wall  and  at  the  boundary  layer  edge: 
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(17) 
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Here,  the  Reynolds  stress  vanishes  according  to  its  limiting  form  near  the 
solid  surface.  At  the  boundary  layer  edge: 


t*  ■  ue  '  mxdy  -  r  (imi)xdy 

'  3  0 


(18) 


The  last  equation  Is  a  particular  form  of  the  usual  von  Karman  momenta* 
Integral  equation.  Here,  at  the  boundary  layer  edge,  it  is  assumed  that  the 
Reynolds  stress  vanishes  along  with  the  gradient  of  the  mean  velocity.  If  the 
mean  velocity  profile  Is  specified  In  some  manner,  then  Eq.  (18)  provides  a 
means  of  determining  the  local  wall  shear.  A1  tematl vely ,  Eq.  (18)  provides  a 
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constraint  on  parameters  that  are  used  In  analytical  approximations  of  the 
velocity  field.  It  Is  Interesting  to  note  that  a  second  Integral  constraint 
may  be  obtained  by  one  further  Integration  of  Eq.  (16),  as  follows  (flat 
plate.  Impermeable  wal 1 ) : 

y  y  £  c 

Uu  -  yr*  ♦  f  <n'u‘>d ?  +  M/  (mu),,dc  -  u  f  (m)xdcid?  (19) 

0  '0‘  0  'O' 

In  the  limit  as  y  exceeds  the  boundary  layer  edge,  the  left  hand  side  becomes 

uue,  which  Is  prescribed  by  the  external  flor,  and  the  right  hand  side 

approaches  a  finite  form  achieved  through  Integration  by  parts  and  utilization 

of  Eq.  (18)  for  an  expression  for  t*.  Thus,  Eq.  (19)  constitutes  an 

additional  constraint  that  must  be  satisfied  by  the  Reynolds  stress  and  mean 

velocity  profiles. 

The  energy  equation  may  be  Integrated  In  a  parallel  fashion  to  provide  an 
expression  for  the  turbulent  heat  transfer  term.  The  result  Is  as  follwvs: 

<n'H’>  «  \  ♦  jr  I7  4  ^  *  ]r)  u  fy  *  *  ?Q  "x^  -  (20) 

The  physical  1  nterpretatlon  of  this  equation  Is  similar  to  that  of  Vi 
momentum  equation,  except  that  Eq.  (20)  describes  the  various  mechanisms  of 
heat  and  kinetic  energy  fluxes.  If  the  mean  velocity  and  mean  temperature 
profiles  were  known,  say  by  experimental  means,  then  Eq.  (20)  could  be  used  to 
calculate  the  turbulent  heat  flux.  With  turbulent  heat  and  momentum  fluxes 
thus  determined,  the  turbulent  Prandtl  number,  PPt,  may  be  directly  calculated 
by  an  appropriate  ratio  obtained  from  the  two. 

Since  no  additional  Information  has  been  Introduced  Into  the  above 
discussion,  It  now  remains  to  formulate  a  closure  scheme  based  on  these 
integral  equations.  This  scheme  relies  on  observations  obtained  from  Blair’s 
data,  which  will  be  presented  In  the  next  section.  It  turns  out  to  be 

n.  IV 


possible  to  formulate  rather  general  expressions  for  em  and  Prt.  According  to 
experimental  observations,  we  define  the  following  function,  to  describe 
the  mean  velocity  field: 


—  *  1  -  exp{  -*[x,y] )  (21) 

According  to  the  no  slip  condition,  *  must  vanish  at  the  wall,  and  in  order  to 
satisfy  the  external  boundary  condition,  4  must  become  unbounded  beyond  the 
boundary  layer  edge.  It  Is  emphasized  that  at  this  point  no  additional 
assumptions  have  been  Imposed,  and  that  Eq.  (21)  merely  serves  as  a 
definition.  The  exponential  form  yields  the  following  expressions  upon 
dl fferentlation: 

ux  a  ue#xexp(  -i)  (22) 

Uy  3  ue#yexp(  -*)  (23) 

Therefore,  x  and  y  derivatives  of  the  mean  velocity  field  are  related  by  the 


following  expression: 


u  . 
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From  the  experimental  evidence  presented  later.  It  will  be  apparent  that  a  has 
a  benign  behavior  such  that  the  ratio  of  its  derivatives  can  be  easily 
modeled.  As  a  limiting  case,  and  for  the  sake  of  convenience  of  presentation, 
the  incompressible  approximation  will  be  discussed  below.  For  cases  of 
moderate  heating,  as  In  Blair's  experiment,  it  can  be  shown  that  the 
variations  In  mean  density  Influence  the  velocity  field  only  as  a  small 
perturbation.  Substitution  of  Eq.  (24)  into  Eq.  (16)  yields  the  following 
representation  for  the  Reynolds  stress: 


-<uV>  «  u*  -  vuy  -  u/Juy(^)dC  ♦  2,/uUy  (Ji)dc 


It  now 


Here,  uT  represents  the  friction  velocity  which  Is  defined  as  f— )lu 

0w 

becomes  evident  how  the  Reynolds  stress  might  be  calculated  in  terms  of  the 
mean  velocity.  If  the  *  function  can  be  effectively  modeled  (Including  FST 
effects),  then  Eq.  (25)  may  be  directly  utilized  for  the  calculation  of 
<u'v‘>.  The  x  variation  does  not  appear  explicitly  in  the  mean  velocity 
profile,  so  that  a  simple  integration  routine  may  be  executed  at  each 
streamwise  location  of  the  marching  procedure.  This  method  is  similar  to  the 
mixing  length  method  in  that  the  unknown  behavior  of  the  Reynolds  stress  has 
been  shifted  to  another  unknown  function.  The  method  will  be  advantageous 
only  If  $  will  admit  a  simple  and  accurate  modeling.  This  turns  out  to  be  the 
case.  A  further  correspondence  may  be  made  between  the  original  mixing  length 
hypothesis  given  in  Eqs.  (12-14)  and  the  modeling  proposed  in  Eq.  (25). 
Utilization  of  Eq.  (18)  and  factorization  of  the  velocity  derivative  yields 
the  following  expression: 

-<uV>  =  em  (~)  (26) 

where:  c*  =  -v  +  ~  /"  UyF  d5  ♦  {I*  /"  UyF  d*  -  /“  uuy  Fd*  (27) 

<Py  0  J  uy  y  J  uy  y  J 

and:  F  =  4x/ ^y 

Therefore,  with  a  specification  of  $,  the  eddy  viscosity  is  directly 
calculable.  It  is  further  Interesting  to  note  that  the  unknown  functions  u, 
v,  and  <u'v’>  may  all  be  directly  calculated  from  the  single  unknown  $.  A 
similar  analysis  leads  to  a  general  formulation  for  the  turbulent  heat  flux, 
which  then  may  be  used  to  model  the  turbulent  Prandtl  number.  However,  these 
equations  will  be  deferred  to  the  next  section  in  which  specific  models  will 
be  discussed. 
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3.0  COMPUTATIONAL  MODELS 


3.1  Observation  of  Three  Layers 

The  first  phase  of  the  Investigation  has  Involved  further  scrutiny  of 
Blair's  data  with  the  objective  of  extending  the  exponential  wake  model 
observed  In  1984  to  Include  the  wall  layer  also.  The  effect  of  FST  In  the 
wake  region  was  clearly  displayed  by  a  marked  decrease  in  curvature  of  the 
exponential  function  as  the  FST  was  increased  [1].  The  pursuit  of  this 
approach  has  lead  to  a  remarkable  analytical  approximation  which  describes  the 
entire  turbulent  boundary  layer.  In  Fig.  1  Is  displayed  a  comparison  of 
Blair's  data  for  mean  velocity  at  x*84  In.  with  grid  configuration  4  (highest 
FST  [18])  and  a  straight  line  least  squares  fit  for  the  outer  portion  of  the 
boundary  layer.  It  Is  clear  that  the  wake  region  follows  a  linear  exponential 
decay  for  the  velocity  deficit  there.  In  attempting  to  characterize  the  wall 
region,  Blair's  data  have  been  subtracted  from  the  extension  of  the  straight 
line  to  the  wall.  It  appeared  that  this  difference  also  followed  an 
exponential  behavior.  In  order  to  highlight  the  behavior,  the  difference  has 
been  plotted  In  a  magnified  semllogarithmlc  format  as  shown  In  Fig.  2.  It  Is 
astonishing  that  the  previous  form  seems  to  have  repeated  itself  on  a  scale 
which  is  approximately  one  order  to  magnitude  smaller.  A  straight  line  curve 
fit  Is  also  displayed  In  Fig.  2  through  the  outer  portion  of  this  smaller 
region.  The  residue  between  the  data  closest  to  the  wall  and  the  second 
straight  line  has  been  plotted  in  a  third  semllogarithmlc  format,  and  the 
results  are  displayed  In  Fig.  3.  Here,  the  characteristic  length  scale  is 
approximately  one  order  of  magnitude  smaller  than  that  of  the  Intermediate 
region.  It  is  further  astonishing  that  these  data  also  fall  on  a  straight 


these  successive  refinements.  The  composite  function  has  the  following 
analytical  representation: 

{p  3  1  -  expf-ApBp  +  exp[-A2-B2n  +  expf-ApBjn}])  (28) 
e 

where:  n  3  and  5  represents  the  local  boundary  layer  thickness.  A 
constraint  Is  imposed  on  the  coefficients  In  the  exponentials  by  the  no  slip 

condition: 

A^  *  expC-A2  +  exp{-A3}]  (29) 

Figures  4-6  display  comparisons  between  the  above  analytical  function  (with 
coefficients  matched  to  Blair's  data)  and  the  data  profiles  themselves.  Fig. 

4  accentuates  the  wake  region,  Fig.  5  shows  the  usual  linear  comparison,  and 
Fig.  6  (the  most  Interesting)  accentuates  the  wall  region  in  a  format  similar 
to  the  Clauser  type  plot,  except  that  the  variables  have  not  been  scaled  with 
the  friction  velocity.  All  three  figures  exhibit  a  very  satisfactory  agreement. 
The  Innermost  comparison  may  be  Improved  by  another  choice  of  A3,  B3  above.  To 
the  authors'  awareness,  the  above  analytical  expression  Is  the  first  whole  layer 
formula  to  describe  a  turbulent  boundary  layer  to  such  accuracy.  In  Fig.  6  the 
Influence  of  each  of  the  three  exponentials  Is  also  displayed.  These  curves 
Indicate  the  sizes  and  locations  of  the  three  sublayers. 

After  the  presentation  of  the  curve  fit,  several  questions  arise  which 
ought  to  be  addressed.  First,  Is  the  functional  form  adequate  for  describing 
the  evolution  of  the  boundarv  layer?  Subsequent  figures  will  show  that  all 
the  profiles  generated  by  Blair  can  be  well  fit  by  extensions  of  the 
above  form.  Second,  how  does  the  functional  form  change  with  varying  levels 
of  FST?  Blair's  data  demonstrate  that  the  outer  layer  coefficients  depend 
strongly  on  the  level  of  FST.  Third,  if  there  are  truly  three  layers  of 
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different  sizes,  what  physical  mechanisms  dominate  in  these  regions,  and  how 
do  these  scales  evolve  In  the  boundary  layer?  Possible  explanations  for  these 
scales  will  be  presented  later.  Fourth,  what  connection  do  these  scales  have 
to  the  classical  notions  of  'wake'  and  'wall'  regions?  This  is  related  to  the 
third  Issue.  Fifth,  is  the  triple  exponential  with  several  adjustable 
coefficients  simply  an  artifact  of  curve  fitting,  or  does  It  contain  an 
inherent  representation  of  the  physics  of  the  problem?  Perhaps  other 
functions  sufficiently  rich  in  coefficients  could  do  equally  well  at  the 
fitting.  A  definitive  answer  is  not  presented  herein,  although  two  points  are 
offered:  (1)  For  the  cases  of  high  FST  the  linear  exponentials  fit  very  well 
over  substantial  ranges  of  the  boundary  layer.  It  Is  unlikely  that  any  other 
simple  function  provides  a  better  characterization.  (2)  Even  If  the  triple 
exponential  were  not  to  comprise  a  fundamental  representation.  It  nevertheless 
follows  the  data  to  such  good  accuracy  that  it  may  be  used  beneficially  for 
engineering  calculations.  Last,  how  might  the  exponential  representation  be 
exploited  for  purposes  of  mixing  length  modeling  which  also  accounts  for  the 
effects  of  FST?  The  method  here  will  consist  of  utilization  of  Blair's  data 
to  model  the  *  function  described  in  the  previous  section. 

3.2  Effect  of  FST 

With  the  appearance  of  a  special  case  of  the  triple  deck  exponential,  it  is 
now  of  Interest  to  seek  a  characterization  of  the  coefficients  as  a  function 
of  x  location,  and  also  to  observe  the  variation  of  the  function  as  the  level 
of  FST  is  varied  parametrically.  In  1984  [2]  It  was  observed  that  the  wake 
portion  of  the  boundary  layer  could  be  described  by  a  linear  exponential  for 
the  higher  levels  of  FST  only.  In  Fig.  7  the  wake  Is  shown  for  the  lowest 
level  of  FST  (grid  01  at  x  =  84  In.  Since  It  can  be  shown  that  the  outer 
portion  of  a  laminar  boundarv  layer  decays  exponentially  with  a  quadratic 
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argument  into  the  free  stream,  the  previous  linear  curve  fit  is  now  extended 
to  a  quadratic  one  in  this  figure.  Qualitatively  It  Is  clear  that  the 
quadratic  fit  Is  good  If  the  free  stream  turbulence  Is  at  a  low  level,  and 
that  a  linear  fit  Is  good  if  the  FST  level  is  high. 

It  is  of  Interest  to  consider  the  extent  of  agreement  of  the  previous 
function  with  the  velocity  profile  of  a  laminar  boundary  layer.  First, 
upstream  of  transition  the  flow  is  laminar,  and  second,  a  quadratic  wake  fit 
seems  to  be  appropriate  for  cases  of  low  FST.  In  Fig.  8  is  shown  the 
conparison  between  a  quadratic  wake  fit  and  a  numerical  solution  of  the 
Blasius  Equation.  The  agreement  is  excellent  for  the  outer  80%  of  the  laminar 
boundary  layer.  Since  it  can  be  shown  that  the  first  two  terms  of  the  Inner 
layers  are  linear  and  quartic  in  y,  a  quartic  Inner  exponential  Is  assumed  to 
describe  the  wall  region.  The  results  of  the  composite  function  are  displayed 
in  Figs.  9-11.  The  agreement  is  remarkably  good,  and  could  be  Improved  by 
further  refinement  of  the  parameters  In  the  wall  region. 

With  the  above  observations  In  mind,  Blair’s  data  have  been  fit  with 
least  squares  quadratics  for  various  x  locations  and  three  levels  of  FST 
(grids  0,  2,  and  4)  in  order  to  observe  these  influences  on  the  coefficients 
of  the  exponentials.  The  procedure  has  been  the  same  for  all  cases:  (1)  Fit 
the  wake  region  first,  excluding  approximately  the  Inner  25%  of  the  boundary 
layer,  (2)  Subtract  the  inner  data  from  the  outer  fit,  (3)  Fit  the 
intermediate  region  to  a  quadratic  curve,  (4)  Subtract  the  remaining  data 
closest  to  the  wall  from  the  conjjoslte  curve,  (5)  Fit  a  third  quadratic  to  the 
innermost  layer.  Admittedly,  this  procedure  Introduces  many  coefficients,  and 
the  results  are  not  entirely  free  of  personal  and  somewhat  arbitrary  judgment. 
However,  the  results  have  been  quite  satisfactory.  In  Figures  12-15  are  shown 
progressions  of  mean  velocity  profiles  for  grid  4  at  x  locations  12,  36,  52, 
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and  84  Inches  respectively.  The  analytical  curves  fit  through  the  data  are 
seen  to  describe  the  boundary  layer  profiles  quite  well,  and  now  these 
functions  may  be  used  to  advantage  in  the  computational  scheme.  Three 
features  are  noteworthy.  First,  the  wake  region  of  the  boundary  layer  scales 
very  well  with  the  local  boundary  layer  thickness.  This  may  be  seen  by  the 
superposition  of  the  curves  (and  data)  at  the  various  x  locations,  especially 
In  the  semi  logarithmic  wake  format.  Second,  the  Inner  two  scales  grow  at  a 
rate  which  Is  slower  than  the  growth  of  5.  This  may  be  observed  by  the 
significant  lengthening  of  the  curves  as  x  increases.  These  two  observations 
are  well  known  In  the  study  of  turbulent  boundary  layers.  Third,  although  the 
Intermediate  portions  of  these  curves  [Figs.  12-15]  are  almost  approximated  by 
straight  lines.  It  Is  clear  from  the  data  that  there  Is  always  some  amount  of 
curvature  there.  The  classical  notion  of  the  logarithmic  layer  may  be 
regained  in  approximation  from  the  analytical  curve  fit  by  an  expansion  In 
this  intermediate  region.  However,  the  linear  logarithmic  term  Is  only  the 
first  In  the  expansion,  and  clearly,  the  figures  display  a  point  of 
Inflection. 

The  effects  of  FST  are  shown  to  be  incorporated  Into  the  analytical  fits 
in  the  sequence  of  Figures  16-23,  which  correspond  to  Blair's  grid  2  and  grid 
0  cases.  At  the  various  x  locations  it  may  be  seen  from  the  semi  logarithmic 
wake  plots  (not  shown)  that  the  boundary  layer  Is  strongly  influenced  by  FST 
as  the  curvature  term  in  the  quadratic  decreases  markedly  as  the  FST 
increases.  The  coefficients  utilized  in  these  exponentials  are  listed  In 
Table  1. 

As  with  most  experiments  involving  turbulent  boundary  layers,  Blair's  data 
shown  In  the  above  plots  suffer  from  the  Inability  to  approach  close  enough  to 
the  wall  (into  the  laminar  sublayer).  This  is  caused  primarily  by  the  small 


size  of  his  apparatus.  It  Is  clear  from  Figs.  12-23  that  the  wall  shear  Is 


determined  predominantly  by  the  character  of  the  Innermost  wall  layer.  In 


fact.  In  the  curve  fitting,  It  Is  possible  to  alter  the  coefficients  of  the 


third  layer  so  that  Cf  changes  by  100%  while  the  outer  two  layers  appear  to  be 


unaffected  In  the  figures.  In  an  effort  to  characterize  the  third  layer,  the 


data  of  Coantic  [30]  and  Kline,  et  al.  [31]  have  been  fit  to  the  exponential 


representation  In  Figs.  24-27.  These  data  are  among  those  which  approach 


farthest  Into  the  sublayer  (Coantic's  data  even  lie  within  unity  y+).  Since 


tabulations  of  these  data  were  not  available  to  the  authors,  there  Is  an 


additional  error  In  the  plots  owing  to  subjective  reading  from  published 


graphs.  Nevertheless,  the  curve  fits  appear  to  be  very  satisfactory.  It  may 


be  shown  that  the  analytical  representation  approaches  the  correct  wall 


behavior  (I.e.  u^-y*  as  y+>0).  The  most  effective  method  of  determining  wall 


shear  Involves  a  full  log-log  plot  of  the  velocity  profile,  as  shown  In  Figs. 


28  and  29  for  the  data  of  Coantic  and  Kline,  et  al .  The  shift  In  the  linear 


portion  provides  Tw  directly.  However,  most  experimental  data  (Including 


Blair's)  do  not  extend  into  the  linear  region. 


In  the  attempt  to  characterize  turbulent  heat  transfer,  It  Is  Important 


to  fit  the  mean  temperature  profiles  In  parallel  with  those  of  the  mean 


velocity.  Figures  30-41  demonstrate  that  the  previous  exponential  Is  also  a 


good  representation  of  the  mean  temperature  distributions.  In  Table  2  are 


listed  the  corresponding  coefficients  for  these  functions.  Although  there  are 


slight  differences,  It  Is  apparent  that  on  the  whole  the  velocity  and 


temperature  profiles  are  very  similar. 


After  having  achieved  a  characterization  of  the  mean  profiles,  the  next 


phase  of  the  Investigation  Involves  making  use  of  this  Information  to  model 


the  unknown  Reynolds  stress  and  turbulent  heat  flux  terms.  In  this  process. 
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the  aim  is  to  simplify  the  dependences  of  the  coefficients  appearing  in  the 
exponentials  to  account  for  two  major  effects;  namely,  the  variations  with  x 
and  with  FST. 

3.3  Turbulent  Fluxes 

The  scrutiny  of  Blair's  data  has  revealed  that  the  mean  velocity  and  mean 
temperature  distributions  in  a  turbulent  boundary  layer  may  be  described  well 
by  the  functional  form: 

7-  *  1  -  expt-*!  +  expt-^  +  exp{-*3}])  (30) 

2  v 

where:  ^  3  a^  ♦  *  c^n  ;  n  *  f 

a2  =  a2  >  b2c  >  c2c2  ;  c  -  f 

*3  3  a3  +  b3?  +  c3?2  ;  c  “  X 

or  equivalently:  *1  3  ^1  +  +  Cp2 

*2  3  ^2  +  ®2n  +  ^n2 

*3  3  A3  *  Bjn  ♦  C3n2 

Here,  6,  e,  and  x  represent  the  characteristic  length  scales  corresponding  to 
the  three  regions  observed  in  the  analytic  fits  of  Blair's  data.  It  remains 
to  determine  what  their  dependences  are  and  how  best  to  characterize  the 
coefficients.  It  is  assuned  that  the  coefficients  a,  b,  c  are  Independent  of 
x,  and  that  the  boundary  layer  evolution  is  scaled  into  the  characteristic 
lengths,  whereas  the  coefficients  A,  B,  C  cannot  be  Independent  of  x.  A 
similar  expression  may  be  written  for  the  temperature  field.  In  the  wake 
region,  the  numbers  appearing  in  Tables  1  and  2  indicate  that  the  following 


model  is  appropriate  for  the  coefficients: 


■  1.45  -  0 .091 e 


bi  -  -1.0  ♦  lt 


t  r ' " 


for  0  <  IA  <  5.0 


Ie  >  5.0 


where: 
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e  ue 


ke  -  <(u'  )2  ♦  (v‘)2  ♦  (*' )2 >1/2 j 


Although  there  is  some  scatter  In  the  values  obtained  by  curve  fitting,  the 


tables  do  indicate  that  these  coefficients  do  not  vary  with  x  to  first 


approximation.  This  statement  Is  In  accord  with  the  notion  that  the  wake 


region  scales  with  the  boundary  layer  thickness,  a.  A  similar  model  Is  made 


for  the  outer  layer  of  the  mean  temperature  field.  In  this  manner,  the  above 


model  introduces  FST  explicitly  Into  the  description  of  the  turbulent  fluxes. 


The  behavior  of  the  two  Inner  layers  Is  somewhat  more  difficult  to 


describe.  The  traditional  characterization  of  a  turbulent  boundary  layer  Is 


In  terms  of  the  'wake'  and  'wall'  regions  only,  and  no  mention  Is  usually  made 


of  three  distinct  layers  which  scale  with  three  different  lengths.  The  terms 


laminar  sublayer,  buffer  layer,  and  logarithmic  wall  layer  are  intended  to 


apply  within  the  wall  layer,  and  all  of  these  are  assumed  to  be  characterized 


by  the  single  length  scale,  v/uT.  Recent  Investigations  [32-34]  have  called 


into  question  the  classical  notion  of  the  logarithmic  wall  region  on  the 


grounds  that  an  overlap  region  may  not  exist  between  the  wake  and  wall 


functions.  In  these  Investigations  a  third  merging  layer  Is  discussed,  but 


the  arguments  have  not  been  widely  accepted  yet,  and  the  topic  is  one  of 


ongoing  research.  The  triple  exponential  observed  herein  may  have  a 
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connection  to  these  proposals.  For  the  present,  we  make  the  following 
observations.  As  the  solid  wall  Is  approached,  the  mean  velocity  and  mean 
temperature  fields  must  satisfy  several  constraints  Imposed  by  their  Taylor 
series  expansions  about  y*Q.  For  velocity,  one  obtains: 

2  , 

u(*.y)  ■  t  ^  *  p „  +  f°)yJ  *  o(y’)  (32) 

w  U  a  Cu 

In  fact,  a  more  coup  rehens Ive  argument  results  In  a  nonvanishing  coefficient 

for  the  y-3  term  owing  to  an  effect  attributable  to  the  y  momentun  equation. 

However,  this  effect  Is  small,  and  will  be  neglected  he^e.  For  an 

incompressible  flow  one  may  show  that  the  effect  of  Reynolds  stress  Is 

Introduced  into  the  expansion  explicitly  only  In  the  y4  term,  although  the 

turbulence  is  also  Implicit  In  an  increased  value  for  tw.  From  the 

Taylor  series  expansion,  and  from  observation  of  experimental  data.  It  Is 

customary  to  utilize  the  friction  velocity,  uT ,  In  scaling  both  the  mean 

velocity  and  the  y  coordinate  In  the  wall  region.  Since  Blair's  data  have 

thus  far  been  presented  In  terms  of  the  dimensionless  ratio,  we  may  seek 
to  express  the  Taylor  series  expansion  In  that  form.  By  such  a  procedure.  It 

becomes  apparent  that  two  length  scales  are  possible;  namely: 

(33) 

ly  m  U  — 

2  e  t* 

The  first  length  scale  Is  the  usual  one  defined  by  the  friction  velocity, 

u« 

whereas  the  second  one  is  larger  by  the  factor,  ^=-,  which  typically  represents 
an  Increase  of  an  order  of  magnitude  or  more.  It  Is  interesting  to  note  that 
*1  is  Independent  of  the  free  stream  explicitly,  whereas  t 2  contains  an 
intermediate  dependence  on  both  ue  and  uT.  At  present.  It  Is  not  clear  from 
the  analytical  fits  of  Blair's  data  whether  or  not  the  two  inner  length  scales 
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should  be  identified  with  n  and  12-  However,  expansion  of  —  naturally 

u 

Involves  use  of  ti,  whereas  expansion  of  —  involves  t?.  These  expansions  are 

ug  *- 

identical  through  their  first  order  terms.  Higher  order  terms  in  the 

respective  expansions  begin  to  differ  in  the  nature  of  their  coefficients. 

However,  in  the  triple  exponential,  the  dominant  term  in  each  layer  near  the 

u 

wall  is  the  linear  one.  Since  the  form  used  here  Is  — ,  both  inner  layers 

ue 

will  oe  assijned  to  scale  with  12,  which  is  in  accord  with  the  usual  'law  of 
the  wall'  to  first  order. 

In  view  of  the  exponential  form  and  the  limiting  behavior  Imposed  by  the 
Taylor  series  expansion,  there  are  now  three  additional  constraints  that  must 
be  satisfied  among  the  coefficients  of  the  triple  exponential.  By  evaluation 
of  the  first  derivative  of  velocity  at  the  wall,  one  obtains  the  relation: 
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rb2 


uue 


T~  +  + 


b3exp 
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(34) 


This  equation  indicates  that  the  shear  stress  depends  on  all  three  length 
scales.  However,  since  the  innermost  length  scale  is  by  far  the  smallest,  one 
expects  that  the  third  term  dominates  the  expression.  This  is  also  in  accord 
the  observation  that  the  shear  stress  is  determined  by  the  velocity  derivative 
evaluated  at  the  wall.  Therefore,  Eqs.  (33)  and  (34)  also  support  the  notion 
that  \  ought  to  be  identified  with  12  t0  first  order.  Thus,  for  convenience 
of  the  present  modeling,  we  choose: 


■J 


v 


The  second  and  third  terms  in  the  Taylor  series  expansion  provide  two  further 
constraints  on  the  coefficients.  For  a  flat  plate  the  second  and  third 
derivatives  of  mean  velocity  vanish  at  the  wall.  From  these  conditions,  we 
choose  to  determine  the  curvature  coefficients  C2  and  C3,  which  are  the  most 
difficult  to  ascertain  from  curve  fitting  of  the  data  as  well.  There  results: 


C3 


2*1 


3  9 1  (  ^  1  •  2C|)  ♦  2A^g^  ♦  3^  A^exp(-A^) 

6Aj  S  2  9j  ♦  B3  )exp( -A3 ) 


(36) 


C  -  i  'g2 
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(b|  -  2C3)exp(-A3)  ♦  (h2  -  2CX l/Aj ] 


(37) 


*4 


where:  *  -82  -  B3  exp  ( - A3 ) 

hi  *  -81  ♦  A^! 

In  order  to  complete  the  specification  of  the  coefficients  in  this  model,  we 
note  the  following  dependences  observed  from  curve  fitting  of  Blair's  data: 

A2  *  0.2  ♦  0 . 2 1 e 

82  *  2.0  ♦  4.0Ie  (38) 

B3  *  b3  T-ilS)  where:  b3  ■»  1.3 


It  appears  from  Blair's  data  that  the  Intermediate  layer  Is  Influenced  by  the 
degree  of  FST  quite  strongly  but  that  the  coefficients  ®2  do  not  depend  on 
x  appreciably.  The  innermost  coefficients  B3,  C3  are  seen  to  vary  strongly 
with  x  as  given  above.  Therefore,  Blair's  data  suggest  that  \  and  e  are  not 
i dentical . 

rflth  the  mean  velocity  field  specified  as  above,  it  now  remains  to 
formulate  the  model  for  the  Reynolds  stress,  and  similarly  for  Prt.  in  order 
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to  utilize  the  general  formula  given  In  Eq.  (25),  the  x  and  y  derivatives  of 
tne  specific  $  function  are  required,  and  for  the  present  case  these  are: 


*  ''i'y'K Q1  ♦  2cLn )  ♦  E'  ♦  2c2c)  ♦  e'*3cf-p)fb3  >  2c3c)'l  (39) 

( Di  *  2Ci  n)  b?  ♦  2c?C  (b-1  ♦  2c-iC ) 

» - L_ - i —  ♦  E  -£ - il  ♦  e  *3  — - 2—\  (40) 


where  E  *  exp(-*2  ♦  e*p[ -♦33 ) 


The  ratio  of  these  two  functions  appears  in  the  general  Reynolds  stress  model 
given  in  Eq.  (25).  While  this  ratio  is  a  complicated  expression,  it  is 
interesting  to  observe  that  in  each  of  the  three  successive  layers  the  ratio 
is  well  approximated  by  the  simpler  forms: 


-^X,  ,  e  X  ,  ,  5  X  , 

y-)  .  /— )  .  >(-) 


Therefore,  tne  Reynolds  stress  is  essentially  determined  by  the  proportionate 

variation  of  the  three  length  scales.  Since  the  boundary  layer  thickness  is  a 

sx 

quantity  which  is  calculated  at  each  streamvlse  step  in  STANCOOL,  the  ratio  — 

may  be  directly  obtained  in  the  process.  Similarly,  since  e  and  \  depend  on 
rw,  which  is  also  calculated,  these  streamwise  variations  may  also  be 
obtained.  For  present  expository  purposes,  we  proceed  to  an  even  simple'- 
model.  The  von  Karman  momentum  integral  equation  (Eq.  (18))  may  be  rewritten 
in  the  more  familiar  form:  . 

V»e“!S  "here  9  4  ;o  k :i '  ^)dy  (42) 

Although  the  mean  velocity  profile  depends  on  three  length  scales,  it  is  clear 
that  the  momentun  thickness,  9,  is  predomi nently  determined  by  5.  Therefore: 


9  *  AS 


Equation  (42)  becomes: 


where  A  h  constant 
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to  utilize  the  general  formula  given  In  Eq.  (25),  the  x  and  y  derivatives  of 
the  specific  *  function  are  required,  and  for  the  present  case  these  are: 


'  2cin>  *  £!  *  2c2«>  *  e‘*3^Ii,f03  *  2c3'>'1  1391 
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y  4  1  e  X  1 

where  E  *  exp(-*2  +  e*p[-*3]) 


The  ratio  of  these  two  functions  appears  In  the  general  Reynolds  stress  model 
given  in  Eq.  (25).  While  this  ratio  Is  a  conpllcated  expression,  it  is 
interesting  to  observe  that  in  each  of  the  three  successive  layers  the  ratio 
is  well  approximated  by  the  simpler  forms: 


Therefore,  the  Reynolds  stress  is  essentially  determined  by  the  proportionate 

variation  of  the  three  length  scales.  Since  the  boundary  layer  thickness  Is  a 

«x 

quantity  which  Is  calculated  at  each  streamwlse  step  In  STANCOOl,  the  ratio  — 

may  be  directly  obtained  in  the  process.  Similarly,  since  e  and  \  depend  on 
rw,  which  Is  also  calculated,  these  streamvlse  variations  may  also  be 
obtained.  For  present  expository  purposes,  we  proceed  to  an  even  simpler 
model.  The  von  Karman  momentum  integral  equation  (Eq.  (18))  may  be  rewritten 
in  the  more  familiar  form:  . 


u2  p.  where  9  *  f  H-  (1  -  j*-)dy 
e  dx  Jn  u„  *■  u--1  J 


(42) 


w  e  e  dx  "0  “e  “e 

Although  the  mean  velocity  profile  depends  on  three  length  scales,  it  is  clear 
that  the  momentun  thickness,  9,  is  predoml nently  determined  by  5.  Therefore: 

9  *  A4  where  A  *  constant  (43) 

Equation  (42)  becomes: 
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A  comparison  of  the  two  limits  of  the  Reynolds  stress  relation  (Eq.  (25))  now 
reveals  a  connection  between  the  Inner  and  outer  scales  of  a  turbulent 
boundary  layer  and  the  mechanism  by  which  FST  influences  the  wall  shear.  In 
the  wake  region,  FST  clearly  Influences  the  rate  of  boundary  layer  growth  and 
the  character  of  the  «  function.  The  evolution  of  this  wake  region  is 
connected  with  a  change  In  the  streamwise  momentin  deficit  that  is  created 
by  the  wall  shear  as  given  by  Eq.  (44).  Finally,  the  Inner  scale,  \, 

Is  dependent  upon  the  local  value  of  tw  as  described  by  Eq.  (35)  (or  perhaps 
Eq.  (33)). 

Values  for  the  proportionate  increases  of  the  scales  may  be  approximated 


from  the  observations  that: 
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These  usually  accepted  dependences  are  in  accord  with  Eq.  (44)  above.  Then  it 


follows  that: 


For  the  length  scales  ii  and  tg  it  follows  that: 


if  ■  to  &  an<j 

more  generally,  for  any  power  law  dependence. 


=  1  r1] 


it  follows  that 


*■*  ,  m 
l  x 


The  important  and  fortuitous  property  of  all  these  dependences  is  that  (-)  is 


a  common  factor  of  any  power  law  variation  In  the  scales,  and  that  this  factor 
cancels  In  the  Reynolds  stress  modeling  to  yield  from  Eq.  (27)  the  result: 
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and 
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myFj  *  (nyF2  +  1yF3)  exp(-*2  ♦  exp[-*3]) 
F1  +  (F2  +  F3)  exp(-a2  +  expL-*3J) 


Fi  *  l>i  +  2  c^  n 
F2  *  b2  +  2  c2  n 

F3  *  (b3  +  2  c3  n)e  *3 
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(49) 


In  this  model,  the  x  derivatives  have  cancelled,  and  the  Reynolds  stress  Is 
confutable  at  every  streanwlse  station  explicitly.  A  parallel  argument  holds 
for  the  energy  equation,  from  which  an  explicit  equation  may  then  be  obtained 
for  the  Prt  profile  throughout  the  boundary  layer.  The  next  section  provides 
a  more  compact  Illustration  of  the  procedure. 


3.4  Particular  Analytical  Solution 

The  general  procedure  described  above  admits  a  particular  solution 
which  Is  extremely  Interesting  for  two  reasons:  (1)  The  solution  thus  obtained 
provides  a  means  for  checking  the  accuracy  and  consistency  of  any  turbulent 
boundary  layer  code  such  as  STANC001.  (2)  The  analytical  solution  provides 
Insights  Into  the  physical  mechanisms  at  work  In  a  turbulent  boundary  layer. 

It  Is  emphasized,  however,  that  this  particular  solution  of  the  equations  does 
not  correspond  to  a  realistic  turbulent  boundary  layer  because  the  turbulent 


i 
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fluxes  are  artificially  constructed.  The  solution  has  originated  from  two 
points  of  view.  First,  It  has  been  observed  that  In  the  wake  region  at  high 
FST,  the  exponential  function,  $,  is  linear  in  y.  Second,  one  attempts  to 
seek  the  simplest  case  for  description  which  falls  within  the  general  realm  of 
the  problem.  These  points  lead  to  consideration  of  the  following  mean 
velocity  profile: 

77-  -  1  -  e‘By  where  B  =  B(x)  (50) 

ue 

From  the  definition  of  the  displacement  thickness,  one  obtains: 

B  »  (51) 

From  the  conservation  of  mass  equation,  one  obtains: 

7j-  •  fi*[l  -  (1  +  n)e'n]  where  n  *  y/5*  (52) 


From  the  momentun  equation  (Eq.  (25)),  one  obtains: 
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Satisfaction  of  the  two  limits  of  the  momentun  equation  results  In  the 
condi tion: 
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integration  of  which  yields  the  growth  rate: 

«*(x)  .  r,  .  4vx  ,1/2 
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In  the  turbulence  kinetic  energy  equation  and  in  the  related  Reynolds 


stress  equation  appear  two  terms  of  physical  significance  (among  others); 
namely,  the  viscous  dissipation,  and  turbulence  production.  Here,  it  is  of 
interest  to  compute  these  terms  for  the  particular  analytical  solution. 


Although  the  viscous  dissipation  due  to  the  turbulent  fluctuations  generally 
dominates  that  due  to  the  mean  velocity,  the  latter  profile  Is  given  here 
explicitly  since  the  turbulence  kinetic  energy  has  not  yet  been  addressed  in 


the  model ing. 
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The  turbulence  production  term  is: 


.  2ou4  . 

P  4  -Uy<uV>  *  -^e-2n  [n  ^  Ce*n-1)} 


From  these  various  profiles,  one  may  define  several  weighted  "characteristic" 
lengths,  with  the  hope  of  identification  with  those  observed  from  Blair's 


dissipation  scale: 


production  scale: 


Reynolds  stress  scale: 


/JyOdy 
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Before  proceeding  with  the  energy  equation,  a  few  comments  of 
interpretation  are  appropriate.  First,  the  above  mathematical  curiosity  falls 
in  a  middle  ground  between  laminar  and  turbulent  flows.  The  square  root 
growth  rate  of  the  boundary  layer  thickness  (6  *  5.36*)  along  with  similarity 
with  respect  to  only  one  length  sca1e{  i.e.  6*)  are  properties  reminiscent  of 
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laminar  boundary  layers.  However,  In  order  for  such  a  simple  profile  to 
maintain  itself,  a  psuedo-Reynolds  stress  Is  required  to  transmit  a  shear 
stress  to  the  wall  which  exceeds  that  of  the  laminar  case.  Although  this 
Reynolds  stress  (Eq.  (53)1  exhibits  well  behaved  properties  throughout  the 
boundary  layer,  it  does  decrease  towards  the  wall  In  proportion  to  n,  which  is 
slower  than  the  expected  for  an  actual  turbulent  boundary  layer.  However, 
for  illustrative  purposes,  none  of  these  qualities  present  serious  drawbacks. 
The  view  taken  for  zeroth  order  closure  of  the  turbulent  boundary  layer  Is 
that  the  mean  profiles  are  determined  In  a  continuous  manner  by  specification 
of  the  turbulent  flux  profiles.  If  the  turbulent  fluxes  were  to  vanish 
identically,  the  solution  would  be  the  laminar  one.  As  the  turbulent  fluxes 
are  increased  parametrically  to  their  fully  turbulent  values,  then  the  mean 
profiles  are  likewise  altered  continuously  to  their  final  shapes.  The 
interpretation  of  the  above  solution  Is  that  If  the  Reynolds  stress  were  to 
take  on  the  form  given  by  Eq.  (53),  then  the  mean  profiles  which  would  satisfy 
the  equations  of  motion  would  assume  the  corresponding  functions  given  above. 

In  order  to  appreciate  the  connection  to  the  turbulent  Prandtl  number, 
the  analytical  solution  will  now  be  extended  to  Include  the  energy  equation  as 
well.  We  explore  the  consequences  resulting  from  the  following  mean 
temperature  profile: 

I-4i  ’  e-8»/s*  (61) 

iw*'e 

where  a  Is  a  factor  which  permits  the  thermal  boundary  layer  to  grow  at  a  rate 
dlf'erlng  from  that  of  the  momentum  layer. 

By  utilization  of  the  assumptions  listed  In  Section  2.2,  the  energy 
equation  may  be  integrated  directly  to  give  the  result: 

-<v'T'>  =■  eHTy  (62) 
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where 
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H  "  S2 ( 1+6 )  8  (~8  +  n)  +  T  (8+1)  Uy- 


In  order  to  achieve  this  result,  it  has  been  necessary  to  make  the  additional 
assumption  that  8  is  constant.  It  may  be  shown  that  8  is  related  to  the 
molecular  Prandtl  number  as  follows: 


82(1  +  8)  *  2Pr 


(63) 


One  concludes  an  analytical  profile  for  Pr^: 

P  *  [e~n  -  1  +  2riJ 
rt  7  2  7T*n  ~  I  2  * i 

flFTT^  '1)+enl 

The  turbulent  Prandtl  nunber  is  smoothly  bounded  by: 

8(8+1) 


2 


-  Prt  -  8 


(64) 


(65) 


for  which  the  limits  depend  upon  the  choice  of  the  molecular  Prandtl  number. 

The  analytical  solution  presented  here  will  be  further  discussed  and 
compared  with  STANCOOL  calculations  in  Section  4. 

3.5  Limiting  Forms 

Equations  have  now  been  presented  for  the  turbulent  fluxes  in  a  sequence 
beginning  with  the  general  form,  continuing  with  specific  observations 
obtained  from  Blair's  data,  and  ending  with  an  instructive  but  artificial 
particular  analytical  solution.  Since  it  does  not  appear  possible  to  obtain  a 
representation  of  the  Reynolds  stress  throughout  the  boundary  layer  by 
analytical  integration  of  Eq.  (25),  it  is  of  Interest  to  seek  asymptotic 
characterizations  in  the  two  limits:  near  the  wall  and  in  the  wake.  These  may 
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The  wall  region  is  of  importance  owing  to  its  immediate  connection  to  the 
wall  shear  and  heat  flux,  which  are  of  practical  concern.  Unfortunately, 
it  is  experimentally  very  difficult  to  obtain  direct  measurements  of  Reynolds 
stress  into  the  buffer  layer  since  this  region  is  so  minute.  Furthermore, 
the  presence  of  the  wall  contaminates  such  measurements.  From  the  analytical 
point  of  view,  the  usual  argument  proceeds  from  Taylor  series  expansions  about 
y  =  0.  If  the  flow  is  assuned  to  be  1  nconpressible,  and  by  invoking  the  no 
slip  condition,  the  conservation  of  mass  equation  yields  for  the  vertical 


velocity  component: 


v(t,x)  *  -^-1  +  o(y3) 

-  3y‘  o  c 


Since  the  streamwise  velocity  conponent  is  linear  in  y  to  first  order,  one 
concludes  for  the  Reynolds  stress: 

<u'v'  >  =■  c(x)y3  +  o(y4)  (67) 

One  cautionary  remark  involves  the  assumption  of  inconpressibility.  If  the 

»  ' 

flow  were  to  contain  significant  variations  of  |£-,  then  the  leading  term 
above  would  be  proportional  to  y^.  A  second  remark  Is  that  it  is  possible 
(although  unlikely)  that  the  fluctuations  leading  to  the  coefficient,  c(x), 
are  uncorrelated  so  that  the  leading  nonvanishing  term  actually  becomes  of 
order  y4.  Here,  the  correct  representation  is  assuned  to  be  given  by  Eq. 

(67).  It  should  be  noted  that  the  commonly  accepted  van  Driest  damping  factor 
[35],  which  is  also  utilized  in  STANC001,  results  In  they4  limiting  behavior. 

Next,  it  will  be  shown  that  the  general  form  proposed  for  the  Reynolds 
stress  Eq.  (25)  is  in  agreement  with  the  limit  given  In  Eq.  (67)  above.  The 
Taylor  series  expansion  for  *  near  the  wall  Is: 
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Substitution  of  the  above,  together  with  Eg.  (32),  into  Eq.  (25)  yields  for 


the  Reynolds  stress: 


-<u'v'>  *  -u[u(i^  u(t)  ^  +  ..]  -  [u*py  ♦  u*t*  [u^P*  o(y3)]. 
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Upon  Integration,  one  obtains  after  some  cancelation  of  terms: 


(4)  (1)  2  4^x^  a(2)  3  4 
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Therefore,  it  is  verified  that  the  use  of  Eq.  (25)  in  further  modeling  of  the 
Reynolds  stress  leads  to  a  behavior  at  the  wall  which  has  the  correct  limiting 
form  in  regard  to  y  dependence.  However,  the  magnitude  of  the  coefficient  of  y3 


remains  to  be  specified  through  the  model,  and  this  depends  on  the  coefficients 


appearing  in  the  triple  deck  exponential, 


In  the  wake  region,  Eq.  (25)  leads  to  a  directly  integrable  form  upon 


noting  that  the  inner  exponentials  become  negligible  there.  In  this  case: 
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Eq.  (25)  may  be  re-written  as: 
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The  terms  require  the  following  Integrations: 


/V*1^  *  2C,  *](-,  |^ldy- 

ana  /V‘l(l-e  "*1!(B1  *  2Cj  *][-»  4l*' 


These  integrals  may  be  rendered  In  terms  of  the  error  function  and  exponentials. 
For  present  purposes,  however,  only  the  case  of  high  FST  will  be  considered,  for 
which:  Ci  *  0.  Then  the  above  Integrals  are: 

.r.-VU"*.  ,  t*  ay'  .  .  ,  i j  (75) 
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Under  these  conditions  the  Reynolds  stress  has  the  expression: 

-««■*•>  ■  u  -  Ifiii  .  (1  .  fji )  .  J  ij  uy)  (771 

Where  the  coefficient,  8;,  depends  on  the  degree  of  FST.  From  the  momentum 
Integral  equation  It  is  also  evident  that  ix  is  proportional  to  UT2. 

Eq.  (77)  is  in  agreement  with  the  1984  Investigation  [1],  In  which  the  eddy 
viscosity  Is  seen  to  increase  linearly  with  y  In  the  wake  region.  This  earlier 
observation  has  now  been  shown  to  be  a  special  case  of  the  more  general 
formulation  expressed  by  Eq.  (25). 
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3.6  The  Suction  Boundary  Layer 


The  suction  boundary  layer  Mas  oiiglnally  proposed  for  investigation  [2] 
for  the  purpose  of  providing  a  simple  limiting  case  of  the  actual  boundary 
layer.  Although  this  is  still  an  Interesting  pursuit,  and  it  will  be  described 
in  this  section,  the  recently  obtained  analytical  solution  presented  earlier 
serves  in  this  capacity  even  more  admirably.  The  advantage  posed  by  the  suction 
boundary  layer  is  that,  by  appropriate  control,  the  flow  statistics  are 
independent  of  the  x  dimension,  thereby  permitting  one  exact  integration  of  all 
the  describing  equations  in  the  hierarchy.  An  approximation  of  this 
hypothetical  flow  condition  could  be  achieved  In  reality  through  careful 
tailoring  of  upstream,  downstream,  and  suction  Influences  on  the  boundary  layer. 
Theoretically,  we  envisage  an  infinite  porous  flat  plate  over  which  flows  a 
uniform  gas  at  a  temperature  differing  from  that  of  the  wall.  The  viscous  layer 
is  maintained  at  a  uniform  and  constant  thickness  through  the  agency  of  steady 
suction  control.  The  "free  stream"  could  be  laminar  or  even  uniformly 
turbulent,  provided  an  energy  mechanism  maintains  the  turbulence.  As  the  flow 
passes  through  the  shear  layer  adjacent  to  the  wall,  the  turbulence  production 
terms  will  generate  a  non-vanishing  Reynolds  stress  distribution.  The  thermal 
structure  may  be  maintained  at  steady  state  by  heat  transfer  mechanisms  within 
the  wall.  Previous  investigations  concerning  the  suction  boundary  layer  are 
mentioned  by  Schlichting  [36]  and  recently  by  Gol'dshtik,  et  al.  [37]. 

The  suction  boundary  layer  comprises  a  special  case  of  the  earlier 
equations,  such  that  all  x  derivatives  are  taken  to  vanish  identically. 

However,  the  wall  boundary  conditions  now  must  Include  a  non-vanishing  velocity 
component  perpendicul ar  to  the  plane  of  the  wall.  The  integrated  form  of  the  x 
momentum  equation  (Eq.  (16))  becomes: 
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The  conservation  of  mass  equation  yields  (Eqs.  (4)  and  (7)): 


n  *  ov  ♦  <o'v'>  =  nw  =  constant  (79) 

The  Reynolds  stress  is  assuned  to  vanish  as  y  approaches  infinity,  along  with 
the  mean  velocity  gradient.  Eq.  (78)  then  provides  an  exact  and  explicit  result 
for  the  wal 1  shear: 


Tw  “  >  0  Sl"C*  "«  <  0 

or:  *  -O.U.V.  (80) 

The  interesting  observation  here  is  that,  regardless  of  turbulence  Intensity, 
the  wall  shear  is  generated  solely  from  the  conversion  of  the  mean  x  momentum  in 
the  free  stream  to  the  vanishing  x  mornentun  condition  at  the  wall.  Eq.  (78) 
provides  a  connection  between  the  velocity  profile  and  the  Reynolds  stress 

distribution.  If  —  *  1-e'*,  then  Eq.  (78)  becomes: 

<n'u’>  *  [u*y  ♦  nw]u„e~*  (81) 

nw 

where  a(Q)  *  0  and  4yl„  3  *  — 


Here,  s  is  expected  to  have  a  form  similar  to  the  one  observed  in  Blair's  data. 

An  alternative  i nterpretation  of  Eq.  (78)  leads  to  an  explicit  solution  for 
the  velocity  field  in  terms  of  the  Reynolds  stress.  By  integration,  one 
obtains: 


where 
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(82) 


The  laminar  solution  is  the  exponential  one  with  vanishing  Reynolds  stress 
above.  For  the  turbulent  case,  the  mean  velocity  depends  continuously  on  the 
shape  of  the  Reynolds  stress. 

For  varying  levels  of  FST,  the  coefficients  implicit  in  the  %  function  are 
expected  to  vary  In  a  manner  similar  to  those  observed  in  3lair's  data.  In  this 
case,  the  wake  region  of  Eq.  (81)  reduces  to  the  form: 

<n '  u '  >  =  V3!--  2C..l(y/.5Il  ♦  n  lu  e*Al-3l (y/«  )<i <y/«  )2  (83) 

4  w  - 

Here,  Aj,  ,  C^,  are  assuned  to  depend  on  FST  as  described  by  Eq.  (31).  It  is 
clear  that  length  scales  which  characterize  the  FST  would  influence  these 
coefficients  as  well  as  the  Intensity  level  of  FST.  It  Is  further  clear  that 
such  a  dependence  is  not  likely  to  be  of  a  simple  one  dimensional  kind,  but  that 
each  dominant  wave  nunber  in  the  power  spectral  density  would  exert  Its  own 
influence.  However,  an  averaged  effect  might  be  achieved  by  considering  the 
longitudinal  integral  length  scale: 

4  - 

Af  *  /  f(y,r)dr  (84) 
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where 


f  3  <u' (y ,x)u' (y,x+r)> 


Although  some  previous  i nvesti gators  [3,5,38]  have  claimed  that  turbulence 
transport  in  the  boundary  layer  Is  most  sensitive  to  integral  scales  of  the  size 
of  4 ,  it  is  considered  here  to  be  a  topic  of  further  research. 

In  parallel  with  the  momentun  equation,  the  energy  equation  (9)  may  also  be 
directly  Integrated  once  to  give: 


<n'H'>  *  Hy  -  n^IH-H^)-  *  u(I  -  p-'u  Uy 
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3y  evaluation  at  the  wall  and  In  the  free  stream,  one  obtains: 
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The  physical  Interpretation  of  this  flow  situation  Is  that  the  flux  of 
total  energy  In  the  y  direction  remains  Invariant  with  y,  whereas  specific 
transport  mechanisms  may  dominate  In  different  regions.  At  the  wall,  the  net 
energy  flux  Is  composed  of  a  combination  of  thermal  conduction  and  heat 
convection  through  the  porous  wall.  In  the  momentum  equation,  the  corresponding 
invariant  is  a  combination  of  local  shear  stress  and  streamwlse  momentum  flux  in 
the  y  di recti  on. 

In  order  to  arrive  at  an  expression  for  Prt,  the  following  decomposition  is 
noted: 


<n'H’>  *  Cp<n'T'>  +  u<n'u’>  ♦  v<n'v’>  ♦  <n'k'2>  (87) 

For  cases  of  dominant  thermal  energy  content,  the  last  two  terms  may  be 
neglected  to  obtain  from  Eqs.  (85)  and  (87): 
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Ihe  turbulent  Prandtl  number  Is  then 
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The  above  analysis  provides  valuable  physical  Insight  into  several  of  the 
processes  at  work  in  a  turbulent  boundary  layer.  The  major  difference  In  the 
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usual  flat  plate  boundary  layer  Is  the  growth  of  the  boundary  layer  thickness 
with  *,  whereas  this  thickness  Is  constant  for  the  uniform  suction  layer.  A1 
in  the  boundary  layer,  both  the  fluxes  of  energy  and  momentun  are  not  quite 
invariant  with  respect  to  y  as  they  are  here,  owing  to  the  growing  streamwise 
integral  deficits. 
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4.0  RESULTS 


4.1  STANCHEK  -  Analytical  Comparison 

The  initial  effort  with  the  code  STANCOOL  consisted  of  slight  alterations 
in  format  so  that  it  would  be  compatible  with  the  IBM  3081  system  at  the 
University  of  Oklahoma.  After  several  weeks,  the  code  was  producing  results 
that  duplicated  the  computations  obtained  in  1984  at  AFWAL/PGTC  by  Seprl  and 
Ebert  [1].  The  next  phase  consisted  of  modifications  to  the  turbulent  flux 
models  as  described  in  the  proposal  [2]  for  the  1985  investigation.  These 
modifications  occur  primarily  in  the  subroutine  AUX.  The  version  of  STANCOOL 
no*  at  OU  contains  five  separate  options  in  the  broader  category  of  mixing 
length  models  in  the  code.  These  are:  (11  the  original  MLH,  (2)  the  MLH  as 
modified  by  Seprl  and  Ebert  (denoted  FST1),  (3)  the  extended  MLH  as  described  in 
[2]  (denoted  FST2),  (4)  the  version  designed  to  calculate  the  case  corresponding 
to  the  analytical  solution  (denoted  STAHCHEKl ,  and  (51  the  latest  turbulent  flux 
model  based  on  the  Integral  relations  .'resented  earlier  (denoted  FST3) .  In  this 
section  the  results  of  STANCHEK  are  discussed. 

The  lowest  order  turbulence  closure  rests  on  the  notion  that  if  the 
Reynolds  stress  distribution  is  presented  along  with  the  prt  profile,  then  a 
boundary  layer  code,  such  as  STANCOOL,  may  be  used  to  calculate  the  mean 
velocity  and  mean  temperature  profiles,  along  with  the  Cf  and  St  distributions 
on  the  wall.  In  STANCHEK,  <u'v'>  and  Prt  are  modified  in  AUX  to  agree  with  the 
analytical  profiles  given  by  Eq.  (53)  and  Eq.  (64)  respectively.  STANCOOL  is 
then  run  as  usual  to  produce  the  flow  field  solution.  Here,  we  compare  these 
calculated  results  with  the  analytical  solution  presented  in  Section  3.4.  This 
check  procedure  is  considered  to  be  quite  useful  since  the  nunber  of  alterations 
of  STANCOOL  consists  of  only  approximately  ten  lines. 


In  order  to  set  the  stage,  the  behavior  of  the  analytical  solution  will  be 
described  first.  In  Fig.  42  is  presented  a  scaled  schematic  of  the 
particular  analytical  boundary  layer.  The  configuration  of  the  flat  plate 
corresponds  to  Blair's  experiment.  Shown  in  the  figure  are  conputer  plots  of 
5* ( x ) ,  6 { x )  and  two  mean  velocity  profiles  located  at  the  initial  and  final 
stations  used  by  Blair  for  measurement.  The  square  root  boundary  layer 
singularity  is  evident  at  the  leading  edge  of  the  plate.  The  Reynolds  number 
variation  is  also  indicated  along  the  abscissa.  The  profiles  consist  of  the 
exponential  given  by  Eq.  (50).  Fig.  43  displays  both  the  Reynolds  stress 
profile  (Eq.  (53))  and  the  mean  normal  velocity  profile  (Eq.  (52))  in  the 
boundary  layer.  These  curves  are  qualitatively  similar  to  those  expected  for  an 
actual  turbulent  boundary  layer. 

The  profiles  of  viscous  dissipation  (mean  velocity  only),  turbulence 
production,  and  Reynolds  stress  are  shown  in  Fig.  44.  Also  indicated  are 
the  various  profile  averaged  length  scales  describing  these  mechanisms.  It  is 
clear  that  a  turbulent  boundary  layer  may  be  described  by  several  length  scales 
beginning  with  the  dissipation  scale,  continuing  with  the  production  scale,  and 
finally  ending  with  the  boundary  layer  thickness  itself.  For  the  actual 
turbulent  boundary  layer,  these  characteristic  inner  scales  lie  closer  to  the 
wall  itself.  It  is  suggested  here  that  the  three  characteristic  scales  observed 
in  the  triple  exponential  might  correspond  to  those  of  viscous  dissipation, 
Reynolds  stress,  and  5,  in  increasing  orde. .  However,  this  identification  has 
not  been  firmly  established  herein,  and  it  remains  a  subject  for  further 
i nvestigation. 

In  Fig.  45  are  displayed  the  relative  growths  and  profiles  of  the  mean 
temperature  and  velocity  fields.  The  molecular  Prandtl  number  is  taken  to  be 
0.71,  so  that  this  calculation  corresponds  to  the  case  of  an  air  flow  over  a 
heated  (or  cooled  plate).  The  thermal  boundary  layer  is  seen  to  be 
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approximately  155  thicker  than  the  viscous  layer.  The  variation  of  Prt  in  the 
boundary  layer  is  shown  in  Fig.  46  as  given  by  Eq.  (64).  The  three  curves 
correspond  to  molecular  Prandtl  numbers  of  0.112,  0.71  and  3.328.  For  these 
particular  cases  of  the  analytical  solution,  Prt  approaches  constant  levels  in 
the  wake  region  of  the  boundary  layer  and  beyond.  However,  it  is  Important  to 
note  that  such  smooth  Prt  profiles  would  not  result  if  the  wall  temperature 
along  the  plate  were  not  constant  (e.g.  a  step  change  in  temperature). 

Given  the  analytical  solution  described  above.  It  Is  of  Interest  to 
ascertain  how  well  STANCOOL  calculates  this  solution.  In  Fig.  47  Is  shown  a 
comiarison  of  the  analytical  solution  (symbols)  with  the  STANCOOL  result  (curve) 
for  the  velocity  profile  at  x  *  84  In.  "Transition"  Is  forced  at  the  leading 
edge  of  the  plate.  Both  profiles  are  presented  scaled  with  respect  to  their  own 
boundary  layer  displacement  thicknesses.  The  agreement  appears  to  be  excellent 
in  this  representation.  However,  there  are  two  dl screpancies  to  be  noted  which 
are  not  evident  In  this  figure.  The  first  Is  shown  in  Fig.  48  which  magnifies 
the  wake  region  of  the  boundary  layer.  It  Is  clear  that  STANCOOL  has  reproduced 
the  exponential  character  of  this  particular  solution  remarkably  well  except  at 
the  boundary  edge,  near  which  numerical  errors  cause  a  departure  of  the 
calculation  from  the  true  nature  of  the  decay.  In  Fig.  47  this  departure  Is  not 
apparent  at  all  because  the  error  magnitude  Is  less  than  15  of  the  free  stream 
velocity.  One  might  expect  such  a  small  error  not  to  be  significant;  however, 
in  fact,  the  calculation  of  the  boundary  layer  thickness  Is  extremely  sensitive 
to  the  nature  of  the  decay  rate  at  the  edge.  This  leads  directly  to  the  second 
discrepancy;  namely,  the  growth  rate  of  the  boundary  layer  thickness  as 
calculated  by  STANCOOL  is  approximately  65  less  than  that  of  the  analytical 
solution.  The  velocity  profiles  In  Fig.  47  are  replotted  In  Fig.  49  with  the 
abscissa  scaled  with  respect  to  an  Internally  calculated  -.  A  measurable 


mismatch  is  exhibited,  which  is  solely  due  to  an  error  in  the  6  calculation  in 
STANCOOL.  This,  in  fact,  also  provides  a  partial  explanation  for  some  of  the 
profile  mismatches  described  in  the  earlier  work  of  1984  [1],  The  fi  calculated 
by  STANCOOL  does  not  always  match  the  actual  6  measured  by  Blair.  A  more 
suitable  abscissa  is  comprised  of  y/5*,  since  this  is  not  as  sensitive  to  small 
discrepancies  at  the  boundary  layer  edge. 

Fig.  50  further  demonstrates  the  above  discrepancy.  The  analytical  and 
calculated  "Reynolds  stresses"  in  STANCHEK  are  in  fact  forced  to  be  Identical 
with  respect  to  y/a.  After  computation  these  profiles  are  rescaled  with  respect 
to  5*  and  the  resulting  mismatch  is  displayed  in  Fig.  50.  Last,  Fig.  51 
displays  the  comparison  of  mean  temperatures  obtained  by  using  the  Prt  profile 
given  by  Eq.  (64).  The  discrepancy  shown  here  is  attributed  to  a  similar 
difference  in  growth  rates  of  the  respective  thermal  boundary  layer  thicknesses. 
A  resolution  of  this  problem  in  the  calculation  of  5  in  STANCOOL  has  not  yet 
emerged,  and  this  topic  remains  for  further  Investigation.  In  summary,  however, 
it  is  gratifying  that  such  a  simple  alteration  of  the  STANCOOL  mixing  length 
hypothesis  has  yielded  excellent  profiles  except  for  the  scaling  of  the  boundary 
layer  thickness. 

4.2  Comparison  with  Boundary  Layer  Data 

Another  benefit  of  the  analytical  solution  is  that  It  alerts  the  user  of 
STANCOOL  to  another  possible  discrepancy  in  calculations  of  real  boundary 
layers,  although  upon  reflection,  this  possibility  is  obvious.  Much  of  the 
profile  mismatch  shown  in  Reference  [1]  might  be  attributable  to  a  disparity 
between  calculated  and  measured  boundary  layer  thicknesses,  which  is  a 
comparison  that  must  be  considered  here  as  well.  The  results  presented  in  this 
section  correspond  to  utilization  of  the  model  described  by  Eq.  (49),  and  this 


option  in  STANCOOL  is  the  one  denoted  by  FST3.  Although  this  model  permits  the 
calculation  of  an  edtfy  viscosity,  effl,  based  on  mean  velocity  profiles,  an 
identification  with  the  mixing  length  hypothesis  is  not  quite  appropriate. 

First,  a  mixing  length  is  not  Introduced  In  the  model,  and  second,  the  resulting 
ed<fy  viscosity  is  not  entirely  proportional  to  Uy,  as  it  is  in  the  MLH. 

The  mixing  length  extension  described  in  the  proposal  for  this 
investigation  [2]  is  denoted  FST2  in  STANCOOL,  and  it  has  also  been  executed 
with  partial  success.  A  parametric  variation  of  FST  Influence  on  the  inner 
layer  (denoted  by  C[2])  has  Indeed  demonstrated  that  wall  and  wake  regions  may 
be  separately  controlled  and  calculated  by  variations  of  the  parameters  of  A,  B, 
and  C.  However,  a  rational  Intrinsic  modeling  for  C  has  not  become  apparent 
from  the  study  of  Blair's  data,  whereas  the  formulation  given  by  Eq.  (49)  has 
such  an  advantage.  Since  FST3  is  considered  superior  to  FST2  at  this  Juncture, 
only  the  former  results  will  be  displayed  here. 

In  Figs.  52  and  53  are  shown  Reynolds  stress  comparisons  between  Blair's 
data  at  x  *  84  in.  and  the  calculated  profiles  utilizing  FST3.  In  these 
calculations  the  coefficients  in  the  exponentials  are  taken  to  have 
representative  constant  values,  and  no  attempt  has  been  made  to  match  the  curve 
fits  of  Blair's  data  at  every  x  location.  It  is  clear  that  the  streamwise 
evolutions  of  these  Reynolds  stress  profiles  agree  well  with  those  measured  at  x 
3  84  in.  for  both  the  bounding  cases  of  low  FST  (0.25%)  and  high  FST  (5%), 
except  for  a  slight  mismatch  of  boundary  layer  thicknesses  which  was  shown 
earlier  to  be  attributable  to  STANCOOL. 

Corresponding  plots  for  mean  velocity  profiles  are  shown  In  Figs.  54 
and  55.  Here  also,  the  calculated  and  measured  profiles  display  a  good 
agreement  in  the  particulars  of  their  shapes,  although  slight  shifts  in  the  <5's 
are  observable.  The  mean  temperature  comparisons  are  shown  in  Figs.  56  and 


57  with  qualitatively  similar  results,  except  that  the  mismatch  is  more 
pronounced.  This  mismatch  may  be  attributable  to  two  causes.  First,  the  Prt 
profile  Is  assuned  to  be  unity  throughout  the  boundary  layer,  because  of  lack  of 
time  for  including  the  improved  modeling.  Second,  it  is  not  evident  to  what 
extent  the  discrepancy  between  the  calculated  and  measured  thermal  thicknesses 
causes  the  observed  mismatch. 

These  figures  demonstrate  that  the  modeling  procedure  has  excellent 
promise,  although  there  has  not  yet  been  sufficient  time  to  bring  the  work  to 
completion.  Several  avenues  connected  with  the  exponential  structure  require 
further  investigation,  and  these  will  be  discussed  in  Section  5. 

4.3  Turbulent  Prandtl  Number 

The  turbulent  Prandtl  number  has  been  Introduced  into  the  study  of  boundary 
layers  primarily  for  two  reasons:  (1)  to  highlight  the  strong  similarity  that 
may  occur  between  the  momentun  and  energy  equations,  and  (2)  to  provide  a 
convenient  numerical  method  for  obtaining  solutions  which  involve  a  coupling  of 
the  velocity  and  temperature  fields.  Originally,  the  Reynolds  analogy  was  meant 
to  be  applicable  under  the  restriction  of  unity  Prandtl  number  (either  molecular 
or  turbulent).  Recently,  computational  schemes  have  employed  Prt  profiles  which 
vary  significantly  from  unity  throughout  the  boundary  layer.  It  seems  clear 
that  the  postulation  of  a  Prt  profile  can  be  artificial  under  some  cl rcumstances 
(as  may  be  that  of  the  Prandtl  mixing  length),  and  these  are  the  cases  In  which 
the  viscous  and  thermal  boundary  layers  bear  little  similarity  to  each  other. 
Even  with  a  close  resemblance,  the  subtle  variations  in  Prt  may  be  difficult  to 
model . 

One  example  for  which  the  viscous  and  thermal  layers  are  markedly  different 
is  the  case  of  a  step  increase  in  wall  temperature  in  a  boundary  layer  that 


already  has  a  developed  viscous  region.  One  might  argue  that  In  the 
neighborhood  of  the  thermal  jump  the  thermal  boundary  layer  hypothesis  is 
Invalidated,  and  also  that  the  developing  thermal  layer  requires  a  certain 
distance  in  which  to  equilibrate.  However,  even  substantially  downstream  of  the 
jump,  there  will  be  a  mismatch  In  thermal  and  viscous  thicknesses.  In  such  a 
circumstance,  it  is  of  interest  to  question  the  validity  of  the  Reynolds  analogy 
and  also  the  significance  of  the  turbulent  Prandtl  number.  Even  in  this  case, 
it  is  not  obvious  that  the  assumption  of  constant  Prt  is  a  poor  one.  Recall  the 
definition: 


Beyond  the  thermal  layer  the  mean  temperature  gradient  vanishes  while  <u'v'>  and 
Uy  do  not  vanish  in  the  larger  viscous  layer.  However,  one  would  also  expect 
< v ' T ' >  to  vanish  beyond  the  thermal  layer.  Therefore,  depending  on  the 
respective  rates  of  decline,  it  is  possible  for  Prt  to  remain  constant  or  be 
mildly  varying.  Similarly,  It  Is  possible  for  Prt  to  remain  constant  whenever 
any  of  the  four  factors  becomes  either  large  or  small,  provided  the  effect  is 
conpensated  appropriately  by  the  other  factors.  In  fact,  the  gross  trends  do 
condensate  in  just  such  a  manner.  However,  we  are  now  in  a  position  to  discuss 
two  examples  for  which  the  gross  trends  do  not  compensate  adequately,  and  these 
bring  into  question  the  general  suitability  of  calculating  heat  transfer  via  Prt 
model  1 ng. 

The  first  example  has  been  provided  during  the  1984  investigation  [1],  in 
which  an  explanation  was  offered  for  the  large  decline  of  Prt  In  several  of  the 
wake  regions  observed  by  Blair.  Owing  to  asymmetries  in  the  experiment,  <u'v'> 
appears  to  have  a  zero  crossing  external  to  the  boundary  layer  before  such  a 
crossing  is  achieved  by  Uy.  By  the  experimental  arrangement,  <v'T’>  and  Ty 


never  have  zero  crossings  in  this  case.  Consequently,  Prt  also  has  a  zero 
crossing,  and  the  wake  region  Prt  profile  declines  in  a  sensitive  manner,  which 
is  extremely  difficult  to  model.  All  four  factors  in  Eq.  (901  tend  to  zero  at 
differing  rates.  In  this  case,  the  Prt  behavior  is  not  dominated  at  all  by  a 
similarity  of  <v’T'>  to  <u'v'>  or  of  Ty  to  Uy.  Another  related  observation  of 
Blair's  data  has  been  given  for  the  case  of  high  FST,  for  which  the  wake  decay 
of  the  mean  temperature  profile  is  exponential,  whereas  the  decline  of  <v'T’>  is 
exponential  at  hal f  that  rate  [I].  In  reconsidering  the  thermal  jump  problem  in 
which  a  smaller  thermal  layer  is  embedded  within  a  larger  viscous  layer.  It 
becomes  highly  questionable  whether  the  declines  of  Ty  and  <v"T'>  are  similar 
enough  to  maintain  a  constant  Prt.  Clearly,  the  dissimilarity  between  momentum 
and  energy  cannot  be  compensated  to  result  in  a  constant  Prt. 

The  second  example  is  provided  by  the  exact  particular  solution  described 
in  Section  3.4.  An  extension  of  the  analysis  to  include  variable  s(x)  leads  to 
the  explicit  formula: 
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Although  Fig.  46  exhibits  mildly  varying  profiles  of  Prf  these  cases  are  chosen 
such  that  the  origins  for  the  thermal  and  viscous  layers  coincide.  Even  here 
there  is  a  variation  of  Prt  throughout  the  boundary  layer.  For  the  more  severe 
comparison  of  a  step  change  in  wall  temperature,  it  is  clear  from  Eq.  (91)  that 
the  Prt  profile  becomes  more  strongly  varying  in  the  y  direction.  Furthermore, 
if  either  qw  or  Tw  varies  with  x  (as  in  most  real  cases),  then  the  Prt  profile 


also  becomes  x  dependent.  Although  in  Blair  s  experiments  qw  was  held  constant, 
the  wall  temperature  varied  significantly  with  x.  One  may  view  a  continuous 
thermal  change  with  x  to  consist  of  a  superposition  of  many  infinitesimal  jumps 
in  wall  temperature.  Each  such  change  propagates  into  the  boundary  layer  in  a 
manner  similar  to  the  embedded  thermal  layer  described  above.  Therefore,  the 
thermal  boundary  layer  Is  a  subtle  composite  of  a  history  of  upstream  variations 
that  Is  quite  distinct  from  the  development  of  the  momentum  layer.  Although 
every  reasonable  model  for  Prt  will  give  results  for  heat  transfer  that  may 
appear  to  be  correct  qualitatively,  the  quantitative  degree  of  accuracy  and 
predictability  would  appear  to  be  difficult  to  ascertain. 

In  view  of  the  foregoing  two  examples,  it  Is  tentatively  concluded  that  Prt 
modeling  is  an  inadequate  approach  for  turbine  blade  heat  transfer  calculations. 
However,  the  more  general  and  novel  formulations  for  <u'v'>  and  <v'T'>  given  in 
Eqs.  (25)  and  (20)  provide  an  intriguing  alternative  which  does  not  suffer  from 
the  problems  mentioned  for  Prt  modeling.  The  factors,  em  and  eH,  are  directly 
calculable  in  terms  of  modeled  mean  profiles  (or  calculated  mean  profiles  In  a 
marching  scheme).  There  is  no  need  to  form  a  ratio  of  quantities  which  vanish 
at  different  rates;  thus,  the  difficulty  of  a  sensitive  Indeterminacy  is 
avoided.  Furthermore,  wall  temperature  history  effects  may  be  directly 
incorporated  into  the  integral  scheme  in  which  <v'T’>  Is  calculated  via 
successive  mean  temperature  (and  velocity)  profiles.  In  parallel,  a  modeling  is 
not  required  for  the  Prandtl  mixing  length  If  Eq.  (25)  is  utilized  to  calculate 


the  Reynolds  stress.  It  has  become  clear  from  study  of  the  wake  region  at  high 
FST  that  the  eddy  viscosity  is  not  adequately  represented  by  there,  but 

rather  by  a  term  proportional  to  y  Itself.  The  formulation  given  by  Eq.  (27) 
provides  a  direct  means  of  calculating  the  eddy  viscosity  throughout  the 
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boundary  layer.  These  directions  are  proposed  for  further  research. 

.  In  order  to  close  the  discussion  of  Prt,  a  summary  will  be  given  here  of 
several  earlier  works  on  the  subject.  The  search  for  Investigations  dealing 
with  Prt  has  yielded  References  [37,39-71],  and  these  may  be  classified  Into 
three  categories:  wall  boundary  layers,  wakes  and  jets,  and  pipes  and  channels. 
A  graphical  summary  of  the  relevant  boundary  layer  trends  is  presented  in  Fig. 
58.  The  work  by  Rotta  [39]  is  often  referred  to  as  a  good  description  of  the 
decline  of  Prt  in  the  outer  boundary  layer.  In  fact,  he  proposed  his  simple 
function  through  observations  of  pipe  data  taken  by  Ludwieg  [40].  Similarly,  it 
should  be  noted  that  the  commonly  accepted  method  for  calculating  in  a  ,  . 
boundary  layer  utilizing  the  logarithmic  fit  with  the  von  Karman  constant,  K, 
has  originated  from  experimental  work  in  pipe  flow  [36],  In  which  the  wall  shear 
is  more  readily  measured  than  in  the  boundary  layer.  In  Fig.  58  are  summarized 
the  recent  works  by  Simpson,  et  al .  [41],  Senda,  et  al .  [42],  Subramanian  and 
Antonia  [43],  and  Snijders,  et  al.  [44],  These  were  directed  towards 
measurements  of  Prt  profiles  in  heated  turbulent  boundary  layers.  It  Is  seen 
that  there  are  significant  shifts  of  Prt  level  from  one  experiment  to  another. 
Also,  all  but  one  of  the  Prt  profiles  tend  to  exhibit  marked  declines  in  the 
wake  region,  except  that  the  error  band  is  large  in  both  the  near  wall  and  far 
wake  regions  owing  to  wall  Interference  and  vanishing  signals  respectively.  All 
of  these  measurements  have  been  made  in  tunnels  for  which  channel  flow  effects 
are  presumably  negligible,  and  they  bear  similarity  to  Blair’s  results.  In 
marked  contrast  are  the  Prt  profiles  exhibited  for  wakes  and  jets  In  free 
ambients  as  shown  in  Fig.  59.  In  these  cases  the  values  for  Prt  actually  tend 
to  increase  beyond  the  viscous  layer  edge.  It  is  clear  that  the  external 
behavior  is  strongly  Influenced  by  the  relative  rates  at  which  the  turbulent 
fluxes  and  mean  gradients  vanish.  These  observations  further  support  the 


conclusion  promoted  herein  that  the  turbulent  Prandtl  number  Is  a  difficult  and 
unreliable  parameter  to  model,  and  such  a  methodology  ought  to  be  avoided  If 
possible. 


33.59 


wasM. 


5.0  CONCLUSIONS  AND  RECOMMENDATIONS 


The  direction  and  content  of  the  present  Investigation  have  been  guided  by 
the  general  objective  of  successfully  calculating  the  evolution  and 
characteristics  of  turbulent  boundary  layers  involving  heat  transfer.  Although 
many  computational  schemes  are  currently  being  employed,  it  Is  clear  that  a 
reliable  and  fundamental  approach  has  not  yet  emerged  in  the  technical  comnunity 
[72],  and  even  calculations  of  the  simplest  flat  plate  cases  are  not  completely 
satisfactory.  This  state  of  affairs  points  out  the  need  for  continued 
fundamental  investigations.  The  specific  objective  herein  has  been  to  study  the 
effects  of  free  stream  turbulence  (FST)  through  utilization  of  Blair's  excellent 
data  and  through  computations  and  modifications  of  the  code,  STANCOOl. 

In  addition  to  the  tasks  mentioned  in  the  proposal  for  this  investigation 
[2],  several  other  major  accomplishments  have  come  to  fruition  during  the  course 
of  this  eight  month  effort.  First,  in  the  search  for  a  wall  layer 
characterization  to  match  the  earlier  exponential  wake  observation,  an 
analytical  approximation  has  been  achieved  which  describes  the  complete  boundary 
layer  profiles  of  mean  velocity  and  temperature.  This  analytical  description  is 
surprisingly  comprehensive  and  flexible,  since  It  is  shown  to  match  laminar  as 
well  as  turbulent  profiles  with  appropriate  changes  in  the  parameters.  The 
effect  of  FST  is  explicitly  displayed  in  the  coefficients  of  the  triple  deck 
exponential.  The  function  matches  the  data  presented  by  Coantic  [30]  and  Kline, 
et  al.  [31],  as  well  as  those  of  Blair  [18].  It  Is  curious  that  three  distinct 
layers  are  observed,  apparently  for  the  first  time  herein. 

The  second  accomplishment  has  been  the  expression  of  the  Reynolds  stress 
and  turbulent  heat  flux  profiles  directly  in  terms  of  the  mean  velocity  and 
temperature  profiles  of  the  boundary  layer  through  an  1 ntegro-di fferential 
relationship.  Scrutiny  of  Blair's  data  has  permitted  a  tractable  formulation  of 
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this  relationship,  and  the  model  has  been  implemented,  although  this  novel  work 
has  not  yet  come  to  completion.  Sample  results  are  exhibited.  FST  Is  seen  to 
influence  the  wake  region  of  the  boundary  layer  explicitly,  and  the  wall  region 
impl icitly . 

Third,  the  more  general  formulation  has  lead  to  a  remarkable  particular 
analytical  solution  to  the  equations  describing  a  turbulent  boundary  layer. 

This  solution  applies  to  the  case  of  a  special  form  of  the  Reynold  stress 
distribution,  which  is  not  entirely  realistic,  but  the  solution  Is  informative. 
The  analytical  solution  may  be  used  to  check  the  correctness  of  any  turbulent 
boundary  layer  code,  and  it  also  provides  guidance  for  the  interpretation  of  the 
physical  mechanisms  at  work  in  a  turbulent  boundary  layer.  The  solution  Is 
extended  to  the  energy  equation,  and  analytical  profiles  for  Prt  are  provided 
for  this  special  case. 

Fourth,  the  study  of  the  suction  boundary  layer  initially  proposed  is  shown 
to  be  a  special  case  of  the  more  general  formulation  presented  herein.  This 
case  is  described,  and  an  explicit  formula  Is  presented  for  the  turbulent 
Prandtl  ntmber  profile. 

Fifth,  STANCOOL  has  been  made  operational  on  the  IBM  3081  system  at  the 
University  of  Oklahoma,  and  three  recent  modifications  in  turbulence  modeling 
have  been  i ncorporated.  These  consist  of  (1)  STANCHEK,  which  calculates  the 
analytical  test  case;  (2)  FST2,  which  utilizes  a  separate  variation  of  wake  and 
wall  FST  effects  in  the  boundary  layer;  and  (3)  FST3,  which  incorporates  the 
more  general  and  novel  Integral  approach  to  the  turbulent  fluxes.  These  options 
have  been  run  and  compared  with  data  with  favorable  results.  However,  the 
conparisons  are  not  yet  complete,  and  a  question  has  also  arisen  concerning  the 
rate  of  boundary  layer  growth  as  calculated  by  STANCOOL.  These  Issues  remain 
for  further  investigation. 
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Sixth,  a  discussion  is  presented  concerning  the  modeling  and  calculation  of 
Prt  profiles.  Several  formulas  are  given  for  its  specification,  among  which  are 
two  explicit  analytical  ones  and  one  general  calculation  procedure.  A  survey  of 
the  literature  has  revealed  a  disparity  in  reported  Prt  profiles.  The  proposed 
calculation  procedure  obviates  the  need  for  introducing  the  Prt  profile 
altogether. 

Based  on  the  findings  of  this  investigation,  several  avenues  for  continued 
study  are  recommended.  With  the  novel  observation  of  a  whole  layer  formula,  it 
is  of  great  interest  to  perform  experimental  work  that  focuses  on  establishing 
the  validity  and  accuracy  of  the  triple  deck  exponential  description.  The 
behavior  of  the  three  associated  length  scales  is  a  related  topic  of  further 
researcn.  It  remains  to  be  seen  whether  a  set  of  universal  coefficients  in  the 
exponential  function  may  be  obtained  and  how  the  length  scales  depend  on  the 
evolution  of  wall  shear.  Further  calculations  are  recommended  with  the  new 
i ntegro-differential  model  for  the  turbulent  fluxes.  Although  the  present 
calculations  demonstrate  a  good  fit  in  quality,  a  better  match  is  to  be  sought 
in  regard  to  the  boundary  layer  growth  rate.  The  investigation  should  also  be 
extended  to  Include  the  cases  of  boundary  layers  with  non-vanishing  pressure 
gradients,  since  these  are  of  practical  concern.  Lastly,  there  has  not  been 
sufficient  time  to  explore  fully  the  general  formulation  of  the  Prt  profile 
presented  here,  and  if  and  its  use  Is  to  be  pursued,  then  its  calculation  in 
STANC001  requires  further  work. 
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COEFFICIENTS  OF  TRIPLE-DECK  EXPONENTIAL  FUNCTION 
FIT  BY  LEAST  SQUARES  ERROR  TO  BLAIR’S  DATA  [18]. 
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TABLE  2 


COEFFICIENTS  OF  TRIPLE-DECK  EXPONENTIAL  FUNCTION 
FIT  8V  LEAST  SQUARES  ERROR  TO  BLAIR'S  DATA  [18]. 
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©  Blair  Data  [18].  (See  Fig 
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Figure  19:  Velocity  profile  at  x 


Q  Blair  Jata  [18].  Grid  0 
-  Eq.  (30) 


0  Blair  data  [18].  Grid  4 
-  Eq.  (20) 


Figure  32:  Temperature  profile  at 
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Figure  49:  Comparison  of  STANCHEK  with  analytical  test  solution 
curves  are  scaled  with  respect  to  their  own  calculat 
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©  Blair  data  [18].  Grid  0.  x  =  84  in. 

-  STANC00L  computation  witn  option  FST3 .  [Eq.  (49)] 
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Figure  57:  Calculated  (F373)  and  measured  mean  tenoerature  orofiles. 
Unity  P  assumed. 
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igure  59:  Turbulent  Prandtl  number  data  for  turbulent  jets  and  wakes  from  three  references 


Abstract 


The  results  from  visual  observations  and  measurements  of  flows  over 


axl symmetric ,  unducced,  and  vertically  mounted  bluff-body  combustors  are 


presented  for  low  Reynolds  number.  The  flow  visualization  is  accomplished  by 


adding  T1C14  vapor  into  the  central  gaseous  propane  jet  for  cold  reacting  and 


combusting  flows,  or  by  injecting  TiCl,;,-^  mixture  into  the  flow  field  behind 


bluff-body  combustors  through  a  1 . 5  mm  O.D.  probe  for  pure  annular  air  jet. 


Micron  size  particles  of  TiO-i  are  formed  from  the  reaction  between  TiCl^ 


H-,0  vapor  either  contained  in  the  annular  air  or  as  a  product  of  combustion. 


Vertical  laser  light  sheets  provide  a  remarkably  detailed  visualization  of  the 


dynamic  structures  in  the  recirculating  zone  behind  the  bluff-body  combustors. 


For  the  pure  annular  air  jet,  the  length  of  the  recirculating  zone  has  a 


maximum  at  approximately  700~800  annular  Reynolds  number  (Ra)  and  approaches 


to  a  constant  value  for  very  large  Ra.  For  the  cold  reacting  flow,  an 


empirical  formula  is  found  from  thousands  of  the  experimental  data  for  the 


relation  between  the  central  jet  height  and  the  flow  conditions  at  the  nozzle 


exit  as  well  as  the  nozzle  diameters.  The  introduction  of  the  central  jet 


Into  the  flow  enlarges  the  recirculating  zone.  The  vortices  in  the 


recirculating  zone  appear  more  organized,  stationary  and  incense  for  attached 


flames  compared  to  the  cold  reacting  flows.  However,  the  size  of  the 


recirculating  zone  and  the  height  of  the  central  jet  are  reduced  by  more  chan 


half.  Also  for  the  attached  flames,  the  central  Jet  penetrates  more  easily 


through  the  recirculating  zone  than  for  the  cold  reacting  flow.  For  the 


detached  flame,  the  height  of  the  central  jet  is  greatly  reduced;  whereas  the 


Length  of  the  recirculating  zone  is  increased  slightly,  when  compared  to  the 


correspond ing  co’d  flow.  It  is  noted  that  when  the  annular  air  velocity  is 


less  than  1.6  m/sec,  the  flame  always  remains  attached;  however,  when  the 
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1.  Introduction 


Non-p remixed  flame  stabilized  by  a  bluff-body  combustor,  such  as  occurs 
when  a  central  fuel  jet  issues  into  a  surrounding  annular  air  jet,  are  often 
used  industrially.  Examples  of  the  use  of  such  burners  are  in  the  combustion 
chambers  of  gas  turbines,  tubular  cooler,  metallurgical  furnaces,  aircraft  jet 
engines,  etc.  Such  bluff-body  combustors  provide  good  flame  stabilization  as 
well  as  easy  control  of  combustion.  Both  the  fuel  and  air  jets  leave  their 
nozzles  with  considerable  momenta.  During  the  mixing  process,  there  is 
transfer  of  mass,  momentum  and  energy  between  the  two  jets  and  also  between 
the  jets  and  the  ambient  air  surrounding  the  bluff-body  combustor. 

Bluff-body  combustors  are  widely  used  for  combustion  processes  requiring 
a  fuel-rich  mixture  at  the  flame  front  but  an  overall  stoichiometric  or  lean 
mixture  further  downstream.  This  type  of  combustor  avoids  pre-ignition  or 
explosion  dangers  inherent  in  premixed  combustion  system  and  can  improve  the 
stability  of  overall  lean  flames. 


From  a  practical  point  of  view,  it  is  necessary  to  better  understand  how 
the  geometrical  arrangements  and  opera  ing  conditions  of  the  bluff-body 
combustor  influence  che  flame  processes  -  particularly  the  flame  stability. 

It  is  well  known  that  the  recirculation  region  and  large  scale  mixing  behind 
the  bluff-body  combustor  account  for  flame  stabilization.  In  short,  many  of 
Che  characteristics  of  these  combustors  are  determined  by  the  aerodynamics  of 
the  flow.  Therefore  che  details  of  the  flow  -  particularly  the  recirculation 
zones,  the  location  of  Che  forward  and  aft  stagnation  points  are  needed  to 
better  understand  the  flame  stabilization  processes.  In  this  study,  cold 
reacting  flow  (isothermal)  and  combusting  flow  were  investigated.  Experiments 


were  also  conducted  for  pure  annular  air  flow.  These  experiments  give  some 
insight  into  how  the  central  fuel  jet  changes  the  recirculation  zone, 
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especially  the  recirculating  zone  length. 

Flows  behind  bluff-body  combustors  are  very  complicated  due  to  separation 
and  recirculation,  exchange  of  mass  and  momentum  between  the  two  jets,  the 
chemical  reactions  involving  large  amounts  of  heat  release  and  vortex 
shedding.  Thus  these  flows  are  very  sensitive  to  probe  interference. 
Therefore,  laser  sheet-lighting  technique  was  used  and  non-intrusive 
measurements  were  made  for  cold  reacting  and  combusting  flows. 

Though  numerous  experiments  have  been  conducted  on  this  type  of  combustor 
-  either  ducted  (Ref.  4  and  5)  or  unducted  (Ref.  3,  6  and  7),  and  numerical 
simulations  (Ref.  8),  there  is  still  not  enough  understanding  of  the  overall 
flow  field.  Therefore,  flow  visualization  coupled  with  simultaneous  pointwise 
measurements  are  essential  for  understanding  the  details  of  the  flow 
consisting  of  large-scale  structures. 

The  present  experiments  are  visual  in  nature  and  are  aimed  at  providing  a 
better  understanding  of  combustion  for  bluff-body  combustors.  The  micron  size 
TIO2  particles  act  as  scattering  media  for  laser  sheet-lighting,  providing 
flow  visualization  of  the  entire  reacting  zone.  Traditionally,  schlleren, 
shadowgraph,  interferometry,  and  direct  photography  have  been  used  in 
combusting  flows.  Unfortunately,  information  obtained  by  these  methods  are 
integrated  across  the  flame  (Ref.  10).  Thus  their  use  has  been  limited  to  a 
great  extent  to  two  dimensional,  steady  flows.  By  sheet-lighting  the  flow,  a 
plane  (vertical  or  horizontal)  in  the  flame  is  observed.  The  1102  particles 
are  formed  as  a  product  of  the  reaction  between  TiCl^  vapor  and  water  vapor. 
Thus  the  HO2  particles  are  formed  in  the  reacting  portion  of  the  flame. 

Since  the  TiCli  vapor  is  added  to  the  propane  (central  jet),  the  occurrence  of 
Ti02  will  be  on  the  rich  zone  of  the  diffusion  flame.  By  adding  the  TiCl^  to 
dry  air  in  the  annulus,  the  formation  of  TiO,  particles  would  occur  in  the 


lean  zone  of  Che  flame.  Records  are  aade  on  either  film  or  video  tapes.  To 
reduce  the  concinuum  radiation  from  che  soot  particles,  a  narrow-band  pass 
filter  centered  ac  5145  A  is  used. 

The  Ti02  particles  have  been  reported  to  be  fairly  uniform  and  generally 
in  che  0.2  to  1  micron  range  -  only  a  small  fraction  in  the  2  or  3  micron 
range  (Ref.  9).  Particles  in  this  size  range  follow  the  flow  and  also  act  as 
good  Mle  scattering  center  (Ref.  28).  The  reaction  of  TiCl/  with  water  vapor 
seems  to  be  nearly  instantaneous,  i.e.,  mixing  limited,  thus  it  can  be  used 
effectively  to  study  turbulent  mixing  processes  (Ref.  3). 

It  is  well  known  that  separated  recirculating  flow  established  behind  the 
bluff  bodies  stabilizes  flames  in  high-velocity  reacting  systems.  Zukoski  and 
Marble  (Ref.  26)  in  an  early  paper  experimentally  reported  that  the  length  of 
the  recirculating  zone  plays  an  important  role  in  flame  stabilization.  The 
dynamics  of  che  near  wake  region  is  very  important  in  the  understanding  of  the 
mechanism  of  flame  stabilization.  For  example,  the  size  of  the  recirculating 


zone  (and  recirculating  intensity)  strongly  affects  che  rate  of  production  of 
hot  products  of  combustion;  i.e.,  the  rate  of  heat  release  from  the  combustion 
process  and  thermal  efficiency. 


Many  investigations  on  separated,  recirculating  flow  for  the  isothermal 
case  have  been  carried  out  over  the  past  few  decades,  and  a  few  on  combusting 
flows  (see,  for  example.  Ref.  1,  11,  12,  and  13).  For  most  of  these 
investigations,  che  bluff  body  was  either  a  disk  or  cone  of  various  cone 
angles.  An  exception  was  the  study  by  Davis  and  Beer  (Ref.  13)  who  used  a 
cylinder  as  one  of  these  bluff  bodies.  The  annular  flow  in  these  studies  was 
at  very  high  Reynolds  numbers.  In  che  present  experiment,  cylinders  were 


chosen  as  che  bluff  bodies  and  the  Reynolds  numbers  for  the  annular  flow 
varied  from  low  to  moderately  high.  We  were  limited  in  che  annular  Reynolds 
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number  by  pressure  available  In  house  air  supply. 

This  study  is  an  extension  of  the  work,  reported  by  Roqueraore,  et  al . 

(Ref.  3)  and  a  result  of  research  proposed  by  Tankin  (Ref.  19).  The  main 
objectives  are: 

(1)  To  visually  determine  the  behavior  of  the  mean  flow  pattern  for  free 
annular  air  jet  and  central  fuel  jet  with  and  without  combustion  under  the 
influence  of  various  bluff-body  blockage  ratios; 

(2)  To  determine  the  difference  between  cold  reacting  flow  and 
combusting  flow; 

(3)  To  measure  the  penetration  lengths  of  the  central  jet  under  various 
flow  conditions  and  blockage  ratios; 

(4)  Compare  the  results  of  this  study  with  previous  measurements  by 
other  investigators. 

2 .  Experimental  Set-Up 

The  bluff-body  combustor  consisted  of  a  fuel  nozzle  located  concentric  to 
an  annular  region  where  air  flowed.  The  fuel  nozzle  was  located  j.n  the  center 
of  a  bluff  body.  The  outer  shell  of  the  combustion  tunnel  could  be 
translated,  thus  insuring  the  annular  region  and  the  central  nozzle  were 
concentric.  This  was  important  because  small  eccentricities  would  lead  to  an 
asymmetric  flow.  The  design  of  the  combustion  tunnel  was  such  that  the  outer 
rim  of  the  combustion  tunnel  (outer  annulus  diameter)  could  be  changed  by 
merely  changing  the  threaded  insert.  Likewise,  the  fuel  nozzle  diameter  could 
be  changed  by  changing  threaded  fuel  nozzle  insert.  These  nozzles  ^re 
tapered,  so  that  the  fuel  jet  had  a  flat  velocity  profile  at  the  nozzle  exit 
and  low  turbulence  inteisity.  The  annular  region  was  also  tapered  for  the 
same  reason. 
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To  Insure  Che  flow  would  be  uniform,  screens  and  fiber  glass  were  placed 
In  Che  annular  region  as  well  as  Che  cencral  pipe  almost  6  Inches  upsCreaa  of 
che  nozzle  exlcs.  A  scheraaCic  diagram  of  Che  corabuscion  Cunnel  Is  shown  in 
Figure  1. 

The  annular  flow  of  air  was  concrolled  by  a  needle  valve  and  measured 
wlch  a  rotameter  which  was  calibraced  wich  a  precision  wec-cesc  mecer.  The 
calibracion  curve  for  the  rotameter  could  be  found  in  Appendix  A.  The  air 
used  in  these  experiments  was  pressurized  room  air.  The  fuel  flow  was 
measured  with  either  of  che  cwo  Gilmont  rotameters  that  were  connected  in 
parallel.  Along  with  che  rotameters,  a  pressure  gauge  and  cherraocouple  were 
installed.  The  fuel  velocity  at  che  nozzle  exit  was  calculated  using  a 
computer  subroutine,  from  equations  provided  by  Gilmont,  Co.,  with  fuel 
temperature,  pressure,  rotameter  scale  reading  and  nozzle  diameters  as  input 
parameters.  The  computer  subroutine  was  titled  CENFV  and  listed  in  either  the 
Appendix  B  or  C. 

For  the  experiments  of  the  cold  reacting  flow  and  combusting  flow, 
building  air  flowed  in  che  annular  .egion  and  propane  wich  small  amounts  of 
TiCl^  vapor  issued  from  che  central  nozzle.  For  the  combusting  flow,  the 
mixture  was  ignited.  The  propane  flow  was  controlled  by  three  valves.  The 
propane  might  pass  over  the  surface  of  liquid  TiCl^,  which  was  in  a  stainless 
steel  container,  picking  up  some  TiCl^  vapor.  Also  it  was  possible  to  have 
che  propane  by-pass  the  TiCl^  container. 

For  the  case  of  the  pure  annular  flow,  the  central  fuel  jet  was  closed 
and  air  was  supplied  to  the  annular  nozzle.  A  small  diameter  probe  (1.5  mm 
O.D.)  was  used  to  inject  a  mixture  of  dry  nitrogen  gas  and  TiCl^  vapor.  The 
TlCl^  vapor  was  entrained  by  the  nitrogen  gas  in  the  same  manner  as  for  the 
propane.  This  injecced  mixture,  which  flowed  from  che  nozzle  of  che  probe, 


was  rapidly  entrained  into  the  recirculation  zone  where  the  T10-,  particles 
acted  as  scattering  centers.  The  recirculation  zone  length,  which  is  defined 
as  the  axial  distance  from  the  bluff-bodv  surface  where  the  velocitv  is  zero 
(stagnation  poinc),  was  visually  determined  where  approximately  half  of  the 
TiO,  particles  moved  downwards  and  half  moved  upwards. 

All  the  gas  lines  from  T1C1,  container  downstream  consisted  of  stainless 
steel  piping  and  stainless  steel  valves.  Even  so,  there  was  occasional 
clogging  of  the  lines.  Provision  was  made  so  that  TiCl^  system  could  easily 
be  disconnected  and  cleaned.  If  partial  blockage  occurred,  the  fuel  flow 
developed  oscillations  that  were  detected  on  the  fuel  rotameter.  The 
partially  plugged  line  or  valves  were  cleaned  by  passing  water  through  the 
line,  followed  with  acetone  and  then  air. 

The  optical  set-up  used  to  visualize  the  flow  field  consisted  of  a  4  watt 
argon-ion  laser.  The  5145  1  line  was  used  in  these  experiments.  When  the 
laser  light  struck  a  glass  rod,  which  behaved  like  a  cylindrical  lens,  the 
light  beam  spread  in  a  plane  normal  to  the  axis  of  the  glass  rod.  The  angle 
of  spreading  depended  on  the  diameter  of  the  glass  rod  -  large  diameter  gave 
smaller  angle  of  spread.  The  width  of  the  sheet  of  laser  could  be  reduced  by 
forming  a  slit  on  the  surface  of  the  glass  rod.  For  the  cold  reacting  flow, 
where  the  aft  stagnation  point  was  relatively  far  from  the  nozzle,  a  small  rod 
of  3  mm  diameter  was  used.  On  the  other  hand,  for  the  combusting  flow 
(attached  flame  only),  the  aft  stagnation  point  was  much  closer  to  the  nozzle 
and  a  rod  of  25  mm  was  used.  The  intensity  of  illumination  in  the  sheet,  of 
course,  was  much  larger.  1hl3  was  fortunate  because  we  needed  more  intensity 
to  overcome  the  illumination  of  the  flame.  To  virtually  eliminate  the 
luminous  radiation  from  the  hot  carbon  particles  in  the  flame  a  narrow  band¬ 
pass  optical  filter  centered  at  5145  X  was  used.  TTiis  filter  had  a  half  width 
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of  90  1  and  reduced  the  light  intensity  ac  5143  i  by  40.. 

To  measure  lengths  of  the  stagnation  points  above  the  nozzle,  a  neon 
helium  laser  !' 6  3  2  3  1)  was  mounted  on  a  vertical  traversing  platform.  This 
laser  light  formed  a  red  spot  due  to  scattering  of  the  T10-.  particles. 
Attached  to  the  traversing  platform  was  a  3"  dial  gauge,  thus  allowing  one  to 
read  the  vertical  position  of  the  placform.  The  dial  gauge  was  "zeroed''  when 
the  neon-helium  laser  was  at  the  nozzle  elevation.  .Also  a  narrow  band  pass 
filter  centered  at  5329  i  was  considered,  but  was  not  found  to  be  necessary. 


3 .  Experimental  Conditions 

For  the  pure  annular  air  flow,  the  central  nozzle  was  blocked  with  a 
silicone  type  caulking  compound.  This  was  carefully  done  so  that  the  surface 
was  smooth;  resulting  in  a  configuration  similar  to  that  used  by  Durao  and 
Whitelaw  (Ref.  II).  The  ratio  of  the  diameter  of  the  inner  annulus  to  the 
diameter  of  the  outer  annulus  was  either  3.5",  0.72  or  3.85;  with  blockage 
ratio  32T,  52T  and  72T  respectively.  The  Reynolds  number,  Sa ,  ranged  from  120 
to  4.3  x  1 3-  -  based  on  the  exit  velc  ity  of  the  annular  air  flow  and 
hydraulic  diameter  (the  Reynolds  number  based  on  the  diameter  of  the  bluff- 
body  combustor,  R^  .  varied  from  320  to  1.3  *  104).  Schematic  diagrams  for 
nozzles  are  shown  in  Figure  2. 

Where  flow  occurred  in  the  fuel  nozzle,  the  Reynolds  number  in  the 

annulus,  Ra ,  varied  from  300  to  1900  (or  R_  from  1100  to  4500).  The  Reynolds 

Ji 

number  in  the  central  fuel  jet,  R^, ,  based  on  the  exit  velocity  and  the 
diameter  of  the  central  fuel  nozzle,  ranged  from  several  tens  to  1600.  The 
flows  in  thl3  study  were  mostly  laminar,  with  the  higher  Reynolds  number  flow 
near  transition  to  turbulence.  In  the  case  of  the  combusting  flow,  the  tests 
were  ail  in  the  laminar  region  ( laninartzation  of  combusting  flow  is  quite 
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obvious)  except  for  the  case  of  detached  flames 
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All  experiments  were  performed  with  a  vertically  mounted,  unducted 
combustor.  The  combustor  was  located  directly  under  a  ventilation  hood  which 
removed  TiO?,  HC1  and  combustion  products  from  the  room  -  discharging  them 
outside  the  building.  Occasionally  there  were  some  air  disturbances  in  the 
room  which  affected  the  flow  pattern,  but  this  was  only  noted  at  low  annular 
air  flow  and  even  then  were  not  significant. 

For  the  experiments  conducted  on  the  cold  reacting  and  combusting  flows, 
no  intrusive  measurements  were  made.  Only  lasers  were  used  and  the  laser 
light  was  scattered  by  the  small  particles  (TiO,  and  soot).  For  the  case  of 
the  pure  annular  flow,  an  Intrusive,  small  diameter  probe  was  used  to  inject 
TiCl^  vapor  and  dry  nitrogen,  and  thus  enable  one  to  observe  the  recirculation 
zone.  This  intrusive  probe  had  some  effect  on  the  flow  field,  particularly  at 
low  air  velocities. 

As  Durao  and  Whitelaw  observed  (Ref.  11)  the  instantaneous  aft  stagnation 
point  fluctuated  in  spite  of  the  low  air  and  fuel  Reynolds  numbers.  Thus,  the 
aft  stagnation  point  was  obtained  by  talcing  the  average  of  several 
measurements . 

Measurements  were  made  of  the  length  of  the  recirculating  zone  for  the 
pure  annular  air  flow,  and  the  axial  location  of  the  forward  and  aft 
stagnation  points  for  the  cold  reacting  flow  and  combusting  flow.  An  attempt 
was  made  to  correlate  those  measured  quantities  with  exit  velocities  and 
nozzle  diameters. 

4.  Coordinate  System 

The  origin  is  at  the  center  of  the  combustor  surface  (the  same  elevation 
or  plane  as  the  nozzle  exit).  The  z-axis  is  in  the  axial  direction,  positive 
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downstream  (i.e.,  vertical  upwards).  The  r-axis  is  radially  out  along  the 
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combustor  surface. 

5.  Observations,  Experimental  Results  and  Discussions 

This  section  is  organized  into  three  parts:  pure  annular  free  jet,  cold 
reacting  flow  and  combusting  flow.  In  the  first  part,  the  results  of 
measurements  on  the  length  of  the  recirculation  zone,  comparisons  with  the 
previous  investigations  and  description  of  the  flow  field  are  presented.  In 
the  second  part,  the  description  of  the  flow  for  different  central  fuel 
velocities  and  the  empirical  formula  about  the  location  of  the  forward 
stagnation  point  with  respect  to  flow  conditions  and  geometries,  drawn  from 
thousands  of  experimental  data,  are  given  for  the  under-penetration  of  the 
central  jet.  For  flow  fields  with  combustion,  the  same  measurements  were  made 
as  for  the  cold  reacting  flow.  Some  phenomena  observed  for  the  combusting 
flow  are  presented  in  the  last  part.  For  the  cold  reacting  and  combusting 
flows,  TiCl^  vapor  was  added  to  the  central  jet,  which  produced  TiOj  particles 
for  flow  visualization. 

5 . 1  Pure  Annular  Air  Jet 

The  flow  system  for  a  pure,  free  annular  air  jet  is  shown  in  Figure  3 
which  exhibits  three  distinct  flow  regions  behind  the  bluff  body:  a  region  of 
recirculation  where  the  mean  velocity  along  the  centerline  is  negative  and  the 
pressure  at  the  center  of  the  vortices  is  minimum;  a  transition  region  where 
the  velocity  along  the  centerline  accelerates  to  a  maximum  velocity  and  a 
downstream  region  where  the  velocity  decays  (Ref.  11,  13  and  20). 

The  recirculation  zone  is  a  region  of  subatmospheric  pressure  caused  by 
the  annular  jet  with  an  associated  closed  ring  vortex  in  the  central  region 
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(See  place  1-b).  This  picture  was  taxen  with  the  annular  air  velocicy  or 


).-»821  a/sec,  and  Che  central  propane  velocity  of  3.0076  a/sec.  A  smali 
amount  of  TiCl^  vapor  was  added  Into  Che  cencral  jet.  Although  this  Is  not 
strictly  pure  annular  flow,  the  ratio  of  central  jet  velocity  to  annular  jet 
velocity  is  only  1.5*.  This  technique  was  used  In  this  instance  because  it 
clearly  showed  the  symmetry  of  the  recirculating  region.  If  one  examines  the 
central  streamlines  near  the  central  jet  exit  (Plate  1-b),  they  are  similar  to 
those  obtained  for  flow  impinging  on  a  flat  surface.  This  Is  further  evidence 
that  the  flow  approaches  the  pure  annular  flow  in  this  test.  When  actual  data 
were  taken  for  the  pure  annular  flow,  the  central  nozzle  was  plugged  and  a 
probe  was  used  co  Inject  che  TiCK  vapor.  The  small  asymmetry  of  the  vortex 
may  be  attributed  Co  the  non-eccentricity  of  che  combustor  arrangement.  The 
bounding  surface  of  the  recirculating  zone  is  clearly  shown  in  Plate  l-b.  To 
obtain  this  surface  from  pointwise  measurements,  it  would  be  necessary  co 
measure  axial  velocity  profiles  and  Integrate  these  values  radially.  That  is, 

r, 

‘  ;u( r , z ) . 2m rdr  »  0  (1) 

where  is  the  rate  of  che  mass  flow  circulating  In  che  recirculation  zone; 
and  u(r,z)  Is  the  z-component  of  the  velocity  at  location  r  In  the  plane  z. 

By  setting  »  0  and  solving  for  r^,  one  could  determine  the  bounding  surface 
of  the  recirculating  zone. 

If  Is  obvious  that  it  is  much  simpler  to  use  flow  visualization  technique 
as  described  In  this  study  to  determine  the  bounding  surface  chan  to  do  It 
from  Equation  (1).  However,  as  seen  in  Plate  1-b,  there  is  some  question 
concerning  the  exact  location  of  the  bounding  surface  at  the  stagnation 
point.  Using  che  probe  technique  for  supplying  TiCl^  vapor,  we  believe,  can 
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tendencies  will  be  discussed  in  greater  detail. 

In  Tesc  I  and  Tesc  II,  the  outer  diameter  of  the  annulus  was  kept 
constant  and  the  inner  diameter  of  the  annulus  was  38.5  mm  and  -5.2  mm 
respectively.  This  corresponds  to  blockage  ratios  of  52*  and  72T.  A  possible 
explanation  for  the  difference  between  the  results  of  Tesc  I  and  Test  II  is  as 
follows:  in  Tesc  I,  the  annular  gap  is  '.37  cm  whereas  in  Test  II  it  is  3.99 

an.  3ne  would  expect  Che  velocity  profile  at  the  exit  to  be  different  for 
Tesc  I  and  II.  Pope  and  Whitelaw  (Ref.  11)  in  their  numerical  simulation 
mentioned  that  che  shape  of  the  velocity  profile  at  the  exit  affects 
significantly  the  downstream  flow  characteristics.  The  results  of  Test  III 
which  has  a  blockage  ratio  of  32T  would  be  expected  to  lie  above  the  results 

of  Test  I  (blockage  of  5 2 T ) .  However  it  lies  between  Test  I  and  Test  II.  A 

possible  explanation  for  this  discrepancy  is  that  the  nozzle  used  in  Test  III 
has  a  modified  geometry.  The  inner  and  outer  walls  of  the  annulus  are  tapered 
19.8°  f  see  Figure  2-c)  .  This  results  in  a  radially  inward  component  of  che 

velocity  at  the  nozzle  exit.  Thus  it  is  expected  that  the  length  of  the 

recirculation  zone  for  such  a  configuration  will  be  reduced.  This  is  in 
accordance  with  che  effect  of  the  forebody  shape  on  the  length  of  the 
recirculating  zone  discussed  by  Davies  and  3eer  (Ref.  13).  The  arguments 
presented  concerning  the  variation  between  Test  I,  Test  IX  and  Test  III  are 
based  on  conjecture. 

The  results  of  thi3  study  are  compared  with  chose  of  previous 
investigations  In  Table  1.  The  recirculation  length  for  confined  flows  is 
significantly  larger  than  that  for  unconfined  flows  (approximately  twice  as 
large  as  for  unconfined  flows).  The  agreement  is  reasonably  good  for  all  the 
investigations  of  unconfined  annular  jets  as  seen  in  Table  1.  Davis  and  Beer 
'Ref.  13)  obtained  I.  (0,  -  0.72  for  unconfined  annular  jet  over  a  cylinder  as 


compared  with  our  values  of  1.00,  0.83.  However  their  Ra  was  much  larger  than 
the  values  In  this  study.  It  should  be  noted  that  the  flow  near  the 
stagnation  point  is  more  unsteady  than  elsewhere  behind  the  bluff  body  in  the 
experiments  presented.  Thus,  the  measured  recirculation  length  is  determined 
on  a  visual  averaging  of  its  value.  As  many  as  seven  such  data  were  taken  and 


then  numerically  averaged 


Table  1.  Length  of  recirculation  zone  for  various  flows 
over  bluff  bodies 


Authors 

Flow  type 

3.R.* 

Ra 

Lrz-3i 

Taylor  & 

confined  disk 

257. 

34,000 

1.75 

Whitelaw 

confined  45°  cone 

25Z 

38, 100 

1.55 

(  1984) 

confined  disk 

50Z 

23,800 

2.20 

Winterfeld 

confined  disk 

25: 

2.0 

(1965) 

confined  90°  cone 

25: 

1.9 

confined  45°  cone 

25: 

1.7 

confined  disk 

4: 

2.0 

confined  90°  cone 

47. 

1.9 

confined  45°  cone 

4Z 

1.7 

Fujii 

confined  60°  wedge 

507. 

1.88 

(1978) 

Bradbury 

confined  flat  plate 

10: 

1.98 

(1976) 

Calvert 

confined  disk 

0.56: 

50,000 

3.04 

( 1966) 

confined  90°  cone 

0.56Z 

50,000 

2.18 

confined  60°  cone 

0.56Z 

50,000 

1.88 

confined  40°  cone 

0.56Z 

50,000 

1 .58 

confined  20°  cone 

0.56Z 

50,000 

1.30 

confined  cylinder 

0.56Z 

50,000 

1.14 

Davies  4 

unconflned  annular 

jet,  disk 

25: 

fully  turbulent 

1.52 

3eer 

unconfined  annular 

jet,  45°  cone 

25: 

1.24 

(1971) 

unconfined  annular 

jet,  cylinder 

25: 

0.72 

unconfined  annular 

jet,  disk 

54Z 

1.16 

Durao  4 

unconflned  annular 

jet,  disk 

20: 

28,300 

1.45 

VThltelaw 

unconfined  annular 

jet,  disk 

397. 

19, 100 

1.15 

(  1978) 

unconfined  annular 

jet,  disk 

50: 

14,800 

1.00 

unconflned  annular 

jet,  disk 

507. 

6,300 

1.01 

unconflned  annular 

jet,  disk 

507. 

3,500 

1.04 

Chlgier 

unconflned  annular 

jet 

44Z 

100,000 

1.10 

4  Beer 

(1964) 

Cansody 

unconflned  disk 

27. 

70,000 

2.5 

(1964)' 

present 

unconflned  annular 

jet,  cylinder 

52Z 

2,500 

1.00 

results 

unconflned  annular 

jet,  cylinder 

72Z 

2,300 

0.83 

unconflned  annular 

jet,  capered 

cylinder  (21.6°) 

32: 

4,300 

0.91 

B.R.  teans  blockage  ratio. 
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5 . 2  Cold  Reacting  Flow 

The  flow  field  behind  blaff-bodv  combustors  could  be  thought  of  as  two 
widely  spaced  jets:  an  annular  jet  and  a  central  fuel  jet  (Ref.  3  and  19).  A 
schematic  diagram  for  the  jets  is  shown  in  Figure  5.  AC  the  nozzle  exit,  the 
two  jecs  are  separated  from  each  ocher,  and  flow  independently.  They  behave 
as  Chough  no  surrounding  fluid  exists.  However  the  two  jets  soon  interact  due 
to  vortices  chat  form  becween  the  two  jets  (see  Place  2  and  3).  As  seen  in 
the  pure  annular  flow  these  vortices  are  set  up  by  Che  annular  jet  and  che 
central  fuel  jet.  In  the  cold  reacting  flow  chese  vortices  are  not 
stationary.  There  are  several  such  vortices  at  any  time  within  the 
recirculating  region,  which  move  usually  downward  and  radially  outward.  At 
che  edge  of  the  recirculating  zone  there  are  vortices  that  are  clearly 
observed  on  the  shear  layer  (see  Plate  2-a).  They  rapidly  grow  in  magnitude 
and  roll  up  into  a  spiral.  In  che  vicinity  of  the  aft  stagnation  point,  some 
of  the  spiral  vortices  on  che  shear  layer  escape  and  move  downstream,  whereas 
others  are  recaptured  by  the  recirculating  zone.  These  spirals  consist  of  air 
packets  which  are  brought  into  Che  recirculating  zone  by  the  recaptured 
spirals.  These  are  seen  as  dark  regions  near  the  aft  stagnation  point  in  che 
photograph.  The  dark  region  near  the  nozzle  is  the  mixture  of  fuel  and  TiCl^ 
vapor  devoid  of  water  vapor  (i.e.,  TiOo  particles).  Then  due  to  the  vortices 
existing  within  the  recirculating  zone,  the  packets  of  air  and  fuel  mix 
togecher  (also  see  Ref.  3). 

Vhen  the  central  jet  velocity  is  very  snail  compared  to  the  reverse  flow 
in  che  recirculating  zone,  the  central  jet  is  turned  outward.  Place  2-b  shows 
che  streak  lines  of  the  central  jet  as  well  as  the  recirculating  zone.  To 
achieve  this,  some  particles  of  TiOo  are  induced  into  the  central  propane 
jet.  As  can  be  seen  the  streamlines  are  similar  to  those  of  two  impinging 
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streams.  Where  the  central  jet  Is  turned  defines  the  forward  stagnation 
point . 

Downstream  of  the  aft  stagnation  point  where  the  axis  of  the  annular  jet 
has  converged  at  the  central  axis,  the  two  jets  have  completely  merged.  The 
behavior  of  the  combined  jets  is  very  similar  to  an  equivalent  single  round 
jet.  Chigier  and  3eer  (Ref.  20)  have  determined  the  effective  origin  and  the 
outside  boundary  of  th  .  equivalent  jet  as  a  function  of  the  velocity  ratio  as 
well  as  the  geometry  or  the  nozzles  for  the  case  of  air  flow  in  the  annular 
and  centr  novzles. 

Two  very  important  parameters  characterizing  the  flow  field  behind  a 
bluff-body  combustor  are  the  location  of  the  forward  and  aft  stagnation 
points.  These  occur  where  the  velocity  along  the  centerline  vanishes.  Since 
these  points  are  usually  oscillatory  they  are  not  easy  to  determine 
precisely.  With  probe  measurements,  which  disturb  the  flow  field,  or  laser 
doppler  measurements,  one  has  to  interpolate  the  mean  velocities  in  front  of 
and  behind  the  stagnation  points.  This  introduces  some  uncertainty  into  the 
measurement  results.  We  found  t.iat  the  forward  stagnation  point  is  stationary 
when  it  is  less  than  half  of  the  recirculation  zone  length.  When  the  forward 
stagnation  point  reaches  the  half  of  the  recirculation  zone  length  it  becomes 
non-stationary .  The  aft  stagnation  point  has  the  recaptured  spiral  vortices 
in  its  immediate  vicinity  and  hence  Is  unsteady.  For  non-stationary  fuel  jet, 
its  bounding  surface  Is  not  as  distinct  as  that  of  stationary  fuel  jet  since 
the  fuel  jet  is  on  the  verge  of  breaking  up  into  smaller  packets. 

From  video  tapes  recorded,  the  flow  field  behind  bluff-bodv  combustors 

may  be  divided  into  three  categories,  although  the  numerical  values  of  w, 

ratio  of  momentum  of  the  central  jet  to  the  annular  jet,  i.e.,  w  =* 

*>  2 

2  V'  A  /p  V"  A  ,  where  A„„  and  A-„  are  the  central  and  annular  nozzle  exit 
c  co  co  a  ao  ao  ’  -t>  ao 
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areas,  respectively,  are  not  exactly  defined  for  the  categorizing.  The  three 
categories  are,  respectivelv ,  that  the  annular  jet  is  dominant;  neither  jet 
dominates  and  the  central  jet  dominates. 

If  the  central  jet  is  weak,  i.e.,  the  momentum  of  the  reverse  flow  set  up 
by  the  annular  jet  is  larger  than  that  of  the  central  jet.  This  reverse  flow 
will  force  the  central  jet  outward  radiallv.  If  the  momentum  of  the  central 
jet  is  so  low  that  it  can  not  penetrate  into  the  recirculation  zone,  the 
forward  stagnation  point  is  zero.  In  this  case,  the  central  jet  is  completely 
absorbed  by  the  annular  jet.  In  this  regime  the  central  jet  motion  is  not 
stationary  -  it  is  pushed  randomly  from  one  side  to  another  by  the  reverse 


If  the  momentum  of  the  central  jet  is  comparable  with  chat  of  the  reverse 
flow,  neither  jet  dominates  the  flow  field.  The  tip  of  the  central  jet  which 
has  mushroom  shape  is  unsteady;  however,  the  stem  is  very  steady.  When  the 
central  jet  flow  is  increased,  Che  forward  penetration  length  increases  and 
the  main  vortices  in  the  recirculation  region  move  laterally  and  become 
smaller. 

If  the  central  jet  is  very  strong,  the  annular  jet  no  longer  plays  an 
imnortant  role;  the  central  jet  dominates  the  flow  field.  The  annular  air  is 
entrained  into  the  central  jet.  Along  the  centerline  no  stagnation  point 
could  be  found  ( overpenecracion) .  As  the  central  jet  velocity  is  increased 
further,  the  central  jet  extracts  more  fluid  from  the  annular  jet  to  satisfy 
its  entrainment  requirement,  and  the  size  of  the  recirculating  zone  is 
reduced.  At  last,  when  the  central  jet  velocity  is  so  large  that  the  central 
jet  is  completely  dominant,  it  absorbs  the  annular  jet  totally.  Then  the 
central  jet  behaves  as  though  no  annular  jet  was  present  except  for  small 
vortices  near  the  combustor  surface.  These  small  vortices  are  very  organized 
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and  stable. 


The  S-R  saddle  points  which  were  computer  simulation  by  Scott  and  Hankey 


for  the  flow  field  behind  a  ducted,  pure  annular  flow  (Ref.  8)  are  also 


observed  in  this  study  and  presented  in  Plate  3-a  and  schematically  shown  in 


Figure  8.  These  saddle  points  occur  on  the  centerline,  the  combustor  surface 


and  also  the  boundary  of  the  central  jet.  On  the  centerline,  such  saddle 


points  occur  where  flows  approach  either  from  opposite  directions  along  the 


centerline  and  depart  in  a  direction  normal  to  the  centerline,  referred  to  as 


S-saddle  point  (i.e.,  the  forward  stagnation  point,  see  point  S->  in  Figure  6), 


or  from  a  direction  normal  to  the  centerline  and  departs  in  opposite 


directions  along  the  centerline,  referred  to  as  R-saddle  point  (i.e.,  aft 


stagnation  point,  see  point  R2  in  Figure  6).  These  saddle  points  are  somewhat 


analogous  to  separation  and  reattachment  points  which  occur  at  solid 


boundaries.  More  important  is  that  on  the  boundary  of  the  central  fuel  jet, 


S-saddle  points  occur  as  a  result  of  the  central  jet  entrained  by  the  annular 


jet,  the  fuel  is  pulled  into  vortices  formed  at  the  tip  and  stem  of  the 


central  jet,  labelled  as  vortex  A  and  B  in  Figure  b.  Almost  simultaneously 


vortex  A  moves  towards  the  combustor  surface  while  vortex  C  convects 


downstream  and  grows.  During  this  time  the  vortex  B  grows  and  releases  its 


fluid  periodically  inco  the  region  vortex  C  occupied  previously.  This 


probably  aids  the  growth  and  convection  of  the  vortex  C.  As  vortex  A  is  shed, 


the  point  Si  (forward  stagnation  point)  oscillates  along  the  centerline. 


Likewise,  the  saddle  points  Sj ,  and  Rj  are  unsteady.  On  the  right  hand 


side  of  the  central  jet  in  Plate  3-a,  vortex  A  is  halfway  to  the  combustor 


surface,  Vortex  C  lost  it3  identity,  and  vortex  B  was  just  releasing  its  fluid 


into  the  region  close  to  the  boundary  of  Che  recirculating  zone.  Thus  it  was 


not  clearly  shown  there.  On  the  combustor  suface  which  is  a  solid  boundary. 
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the  S-  and  R-saddle  points  (separation  (s)  and  reattachment  (R))  are 
observed.  It  is  noted,  and  also  can  be  inferred  that  a  stationary  separation 
point  Sj  (see  Figure  6)  always  exists  at  the  outside  edge  of  the  combustor 
surface,  while  the  rea  t.ichment  point  R^  moves  in  the  radial  direction  along 
the  combustor  surface.  A  streamline  originated  near  the  point  Sj  will  evolve 
into  a  vortex  D  (Figure  6)  above  the  forward  stagnation  point.  The  separation 
streamline  starting  at  the  point  Sj  will  form  the  boundary  of  the 
recirculating  zone,  and  attach  to  the  centerline.  The  reattaching  point  R-> 
oscillates  along  the  centerline  as  vortex  D  is  shed.  The  interactions  between 
adjacent  vortices  as  they  form  and  move  up-  or  downstream  are  very  important 
to  the  understanding  of  mixing  process  hence  combustion  process  in  the 
recirculating  zone. 

It  should  be  emphasized  that  all  the  above  discussion  is  for  annular  air 
velocity  greater  than  0.5  m/sec.  If  less  than  0.5  m/sec,  the  annular  air  is 
not  sufficiently  strong  to  form  the  usual  recirculating  zone  presented.  Plate 
4-a  shows  the  flow  with  fuel  velocity  of  0.2  m/sec,  and  air  velocity  of  0.4 
m/sec.  The  flow  field  is  irregular  and  large  amounts  of  air  intrude  deep  into 
the  recirculating  zone,  which  is  not  confined  by  an  annular  jet.  Eddies  have 
torn  away  the  boundaries  of  the  recirculating  zone  except  the  region  very 
close  to  the  separation  point.  It  is  interesting  to  note  that  this  phenomenon 
never  occurs  for  the  combusting  flow. 

Experimental  Results  and  Discussions 


Using  dimensional  analysis,  the  following  expression  is  obtained: 


where  L  ■  location  of  the  forward  stagnation  point  along  the  centerline; 
■  diameter  of  the  central  nozzle; 

-  diameter  of  the  inner  annulus; 

DQ  ”  diameter  of  the  outer  annulus; 

Vao  »  velocity  of  the  annular  jet  at  the  nozzle  exit; 

Vco  »  velocity  of  the  central  jet  at  the  nozzle  exit; 

Lrz  »  length  of  the  recirculating  zone; 

Vao(Do_Di) 

Ra  »  - — ,  Reynolds  nuaber  of  the  annular  jet; 

ua 

V  D. 

CO  1 

R_  ■  - ■*-,  Reynolds  number  of  the  central  jet; 

C  V 
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By  comparing  Equation  (2)  with  the  experimental  results  shown  in  Figure  7  and 

Equation  (3)  below,  it  appears  that  Lrz/D^  and  Vao/Vco  have  no  effect  on  -g— . 

this  could  be  explained  as  follows:  the  effects  of  Vao  and  Vco  have  been 

Lrz 

taken  into  account  in  the  parameter  Rc  and  Ra,  and  that  — —  is  nearly  constant 

Ui 

(see  Figure  8).  The  forward  stagnation  point  is  strongly  dependent  on  the 
geometry  and  the  Reynolds  numbers  of  the  central  jet  and  the  annular  jet. 

The  empirical  formula  shown  in  Figure  7,  which  is  the  result  of  thousands 
of  experimental  data,  can  be  expressed  in  the  following  form: 


L_ 

D, 


1.5 


(3) 


where  A  is  constant,  given  in  Table  2. 

From  Table  2,  it  seems  that  A  depends  largely  on  fluids  used  in  the 


central  and  annular  jets.  Later  on,  in  an  analytical  approach  it  will  be 
shown  that  A  is  really  the  function  of  the  physical  properties  of  fluids  in 


3-. .  2  3 


Che  cwo  jets.  The  power  of  Rg  is  always  negative,  i.e.,  as  Rg  increases  while 
keeping  ocher  parameters  unchanged,  the  central  jet  will  be  shortened.  Thus, 


when  Xa  is  increased,  R„  should  be  also  Increased  in  order  to  maintain  the 
central  jet  at  the  same  height.  Equation  (3)  shows  that  for  larger  Rc,  i.e., 
larger  momencum  of  the  central  jet,  the  height  of  the  central  jet  increases, 
and  chat  for  smaller  central  nozzle  diameter  ,  the  forward  stagnation  point 
moves  downstream  if  keeping  fuel  volume  flow  race  fixed,  which  was  also  noted 
during  the  experiments.  The  latter  can  be  easily  shown  as  follows: 


where  0C  is  the  fuel  volume  flow  rate.  Thus  the  exit  momentum  of  the  central 
jet,  Gc,  is 


G 

c 


P  -  D'TV2 
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Therefore  if  the  central  jet  nozzle  diameter  is  reduced,  the  momentum  of  the 
central  jet  is  increased.  Hence  it  can  penetrate  further  into  the 
recirculating  zone. 

The  reason  that  L  is  normalized  by  Dj  ,  not  by  Lrz  or  Lp  as  Tankin  did 
(Ref.  3)  is  that  for  Tankin's  case,  the  annular  air  velocity  was  very  large, 
the  aft  stagnation  point  as  reported  remained  almost  constant,  and  coincided 
with  the  penetration  point.  However,  for  the  presenc  case,  the  annular 
velocity  was  small,  the  central  jet  had  some  effects  on  Lrz  and  Lp ,  whose 
changes  will  be  presented  in  the  next  section.  Considering  the  unsteady 
nature  of  the  points,  which  results  in  inaccurace  measurements,  ratios  L/Lrz 
or  L/L_  will  amplify  measurement  errors.  In  addition  curves  L/Lrz  or  L/Lp 


Thus  in  the 


vs.  Vc0/V  has  been  forced  to  pass  through  the  point  (1,1). 
present  case,  although  all  the  curves  are  similar  to  each  other,  they  never 
coalesce  into  one  curve.  Figures  10  and  11  show  curves  L/Lrz  vs.  VC0/VpO  and 
vco/vao  resPeccive^F*  The  solid  curves  are  the  results  of  the  least  square 
fit  to  the  experimental  data.  This  is  obtained  by  rearranging  the  data  on 
Cyber  730  and  plotting  on  the  Tektronic  plotter.  The  computer  program  for 
this  can  be  found  in  Appendix  8. 

From  Eq .  (3)  one  could  understand  why  Roquemore  &  Tankin  (Ref.  3)  and 

Nanazian  (Ref.  7)  found  out  that  the  axial  location  of  the  forward  stagnation 

V 

co 

point  was  the  function  of  the  velocity  ra-io  y —  only  because  the  nozzle 

ao 


diameters  were  fixed  in  their  cases. 


Table  2.  Constant  A  and  Experimental  Ranges  for  Eq .  (3) 


Authors 

A 

Ra 

fluid  in  central  jet 

present 

1.700 

500-1,900 

propane 

Namazlan 
(Ref.  7) 

3.083 

20,000-70,000 

methane 

Tankin 
(Ref.  27) 

3.125 

1,250-22,500 

air 

Note:  the  fluid  used  in  the  annular  jet  is  air. 

5.3  Combusting  Flows 

The  effect  of  combustion  is  far  more  Chan  just  a  density  change.  The 
large  amount  of  heat  released  by  chemical  reaction  during  the  combustion 
process  has  significant  influence  on  the  flow  field,  flow  properties  and 
physical  properties  of  the  fluids.  A  thorough  understanding  of  combustion 
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process  involves  Che  mechanism  of  chemical  reactions  and  Che  mixing  of 
reactants  and  products  as  well  as  interactions  between  them.  The 
distributions  of  velocity,  temperature  and  species  concentrations  are  required 
for  a  complete  description  of  a  combustion  system.  Before  such  detailed 
Knowledge  is  obtained,  the  global  features  of  the  system  is  required,  which 
can  be  gained  by  flow  visualization  technique.  For  a  bluff-body  combustor, 
the  region  close  to  the  combustor  is  very  important  to  flame  ignition  and 
stabilization.  In  such  a  system,  combustion  processes  are  conventionally 
taken  for  granted  to  be  controlled  by  mixing  and  diffusion  of  various 
components  in  the  system  (Ref.  33),  i.e.,  chemical  reactions  are  almost  always 
assumed  to  be  fast  compared  with  the  rate  of  mixing  and  the  overall  rate  of 
reaction  is  controlled  by  the  rate  of  mixing.  Hence,  aerodynamic  aspects  are 
emphasized  here  rather  than  chemical  kinetics  and  the  reaction  mechanisms. 
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Observations 

It  was  noticed  in  the  experiments  and  video  tapes  that  when  the  annular 
air  velocity  at  the  exit  is  less  dan  1.6  m/sec,  the  flame  always  remains 
attached  to  the  combustor  surface.  However,  when  the  fuel  velocity  i3  reduced 
below  a  certain  value,  the  flame  appears  only  in  the  vortex  region  and  opens 
at  the  top,  i.e.,  no  flame  exists  along  the  centerline.  The  vortices  within 
the  recirculating  zone  entrains  the  fuel  from  the  central  jet.  The  direction 
of  the  rotation  of  the  vortices  is  such  that  the  combustion  products  are 
directed  downward  along  the  centerline.  In  essence,  the  combustion  products 
extinguish  the  flame.  Thus,  no  combustion  occurs  along  the  centerline  - 
resulting  in  top-open  flame.  This  was  noticed  to  occur  when  the  forward 
stagnation  point  is  almost  located  in  the  plane  of  the  combustor  surface. 

Plate  5  shows  the  top-open  flame.  This  kind  of  top-open  flame  is  different 
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from  thac  treated  first  by  Lewis  and  von  Elbe  (Ref.  29),  and  later  by  aanv 


others  like  Law  (Ref.  23). 

For  this  top-open  flane  soot  particles  are  deposited  quickly  on  the 
combustor  surface  covering  almost  80*  of  the  surface  area  -  the  oucer  202 
being  free  of  soot.  After  several  minutes  of  burning,  this  layer  may  be  as 
high  as  a  few  millimeters,  having  Its  greatest  thickness  at  the  outer  edge  of 
the  layer.  The  formation  of  thi3  soot  layer  could  be  explained  as  follows: 
since  the  penetraclon  of  the  fuel  jet  is  so  small  (nearly  zero),  all  the  soot 
particles  chat  are  formed  are  trapped  in  the  vortices.  Under  steady  state 
condition,  sooc  particles  which  are  continuously  being  formed  settle  on  the 
combustor  surface.  The  fuel  is  drawn  outward  along  the  combustor  surface  by 
the  vortices.  This  fuel  flow  brings  the  soot  particles  outwards  to  form  the 
greatest  thickness  of  the  3oot  layer  at  the  outer  edge  of  the  layer.  The 
formation  of  soot  is  discussed  in  Ref.  2  and  21. 


The  flame  is  predominantly  yellow  in  color;  however  a  blue  region 
exists.  For  the  case  of  an  attached  flame,  this  region  -  short  in  length  - 
appears  in  the  inner  shear  layer  of  the  annular  jet  close  to  the  combustor 
surface  (see  Plate  8).  For  a  detached  flame  no  burning  appears  in  the 


vicinity  of  the  combustor  for  a  distance  of  between  (0, 5-1.0)  .  The  blue 

region  appears  between  the  upstream  non-burning  zone  and  downstream  yellow 
flame  (see  Plate  7).  Vortices  are  observed  near  the  tip  of  the  fuel 
penetration  -  which  are  highly  unstable.  The  shedding  of  the  vortices  is 
noted  to  occur  simultaneously  with  large  oscillation  of  the  whole  flow  field  - 
including  the  flame. 

It  is  Interesting  to  note  that  the  flame  in  our  study  always  attaches  to 
the  combustor  surface  when  the  annular  air  velocity,  Va0 ,  is  less  than  1.6 
m/sec,  no  natter  how  the  central  fuel  velocity,  Vco,  is  changed,  either 
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increased  or  decreased.  However  when  VaQ  exceeds  L.6  0/ sec ,  the  flame  Is 
attached  to  the  conbuscor  surface  for  only  very  small  Vco  (see  Plate  6).  It 
becomes  unstable  If  is  larger  than  a  certain  value,  any  external 

disturbances  could  lead  co  the  flame  detachment  from  the  surface.  Sirignano 
has  presented  the  effect  of  external  disturbances  on  axisymmetric  diffusion 
flame  (Ref.  34).  In  our  experiments,  when  the  flame  has  just  detached  from 
the  surface,  it  is  easily  extinguished.  In  fact,  blow-off  was  observed 
several  times  at  this  condition  during  the  experiments.  Plate  7  shows  such 
detached  flames.  However  if  VCQ  is  increased  further,  the  flame  reattaches  to 
the  combustor  (see  Plate  8).  The  sizes  of  the  recirculation  zone  and  vortices 
diminish  as  continues  to  be  increased.  The  yellow  flame  appearing  near 

the  stem  of  the  central  jet  is  anchored  by  the  vortices  and  is  reduced  with  a 
reduction  of  the  vortex  size.  These  vortices,  rotating  on  their  upper 
boundaries  from  the  annular  jet  to  the  central  jet,  are  well  organized  and 
have  large-scale  structure  as  seen  in  Plate  8-b  and  c.  At  the  Instant  of 
reattachraent ,  above  this  yellow  flame  near  the  combustor  is  a  blue  zone  which 
followed  by  another  yellow  flame  The  blue  flame  decreases  with  the  increase 
of  VCQ,  and  disappears  at  last.  When  the  annular  air  jet  is  fully  absorbed  by 
the  central  jet,  the  vortices  near  the  combustor  surface  are  no  longer 
observed.  Usually  the  downstream  yellow  flame  dominates  the  flow,  occupying 
the  whole  flow  region  when  the  blue  flame  region  is  absent.  Plate  8  shows 
this.  In  the  photographs,  the  blue  zone  is  less  noticeable  than  it  is  in  the 
laboratory  perhaps  due  to  dominance  of  the  radiation  from  the  yellow  portion 
of  the  flame.  The  downstream  vellow  flame  is  severely  distorted.  The  dark 
region  in  the  flame  is  the  intruded  air. 


0 


The  appearance  of  the  blue  flame  reported  In  Reference  7  is  similar  to 
'he  present  observation.  However,  Ramohalli  observed  (Ref.  32)  that  the  lift- 
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off  (detached)  non-premlxed  flame  appeared  blue  practically  devoid  of  yellow 
flame  (carbon  glow).  As  far  as  the  present  observation  is  concerned,  the  blue 
flame  seems  to  surround  the  yellow  flame.  This  difference  may  be  due  to 
different  experimental  conditions  between  those  in  this  study  and  those  of 
Raraohalli . 

The  characteristics  of  the  vortices  depends  on  the  geometry,  the 
velocities  of  the  central  and  annular  jets.  For  Dj  »  6.35  mm,  Va0  <  1.6 
m/sec,  and  small  VCQ,  the  size  of  the  vortices  is  comparable  with  the 
recirculating  zone.  However,  vortex  size  is  reduced  when  either  the  annular 
Jet  velocity  or  the  central  jet  velocity  is  increased.  Plate  9-a  shows  such  a 
flame  (attached). 

For  Dj  -  12.7  mm  and  Va0  <  1.6  m/s ec  (the  flame  is  attached,  see  Plate  9- 
c);  the  annular  vortices  are  believed  to  be  always  located  above  the  forward 
stagnation  point.  When  VCQ  values  are  low,  the  vortices  are  large  and  occupy 
the  region  between  the  forward  and  aft  stagnation  points.  As  VQ0  is 
increased,  the  forward  stagnation  point  pushes  the  vortices  ahead  of  it.  When 
the  forward  stagnation  point  reaches  about  as  high  as  the  central  nozzle 
diameter  0*  (12.7  mm),  small  vortices  form  near  the  tip  and  stem  of  the 
central  jet,  and  vortices  due  to  the  annular  jet  appear  at  the  outside  edge  of 
the  combustor  surface.  These  annular  vortices  are  designated  as  lower 
vortices.  Initially  the  annular  vortices  which  are  being  pushed  forward  by 
the  central  jet  are  called  the  upper  vortices.  The  upper  vortices  are  reduced 
in  3ize  and  intensity  as  the  forward  stagnation  point  pushes  them  towards  the 
aft  stagnation  point,  and  lose  their  identity  as  penetration  of  the  central 
jet  through  the  recirculating  zone  occurs.  During  this  process  the  lower 
vortices  behave  very  similarly  to  those  of  Dj  *  6.35  mm  (Plate  9-a). 

The  development  of  the  vortices  for  Dj  “  9.45  mm  and  Vao  <  1.6  m/sec  is 


between  the  above  two  cases.  Since  the  space  between  two  jets  is  large  enough 
to  allow  the  vortices  due  to  the  annular  jet  (annular  jet  vortices)  to  renain 
more  or  less  fixed  in  location.  However,  there  is  distortion  of  such  vortices 
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due  to  the  vortices  caused  by  the  central  jet  (central  jet  vortices).  These 
central  jet  vortices  alternately  shed  and  thus  distort  the  annular  jet 
vortices.  The  rotations  of  the  annular  jet  vortices  are  opposite  to  those  of 
the  central  jet  vortices.  Plate  9-b  shows  the  annular  jet  vortices  and  the 
central  jet  vortices.  The  annular  jet  vortices  are  the  outer  ones  and  the 
central  jet  vortices  are  the  inner  pairing  ones.  When  the  central  jet 
velocity  increases,  the  inner  vortices  (central  jet  vortices)  grow  and  the 
height  of  their  centers  increases;  the  oucer  vortices  (annular  jet  vortices) 
are  distorted.  In  this  photograph,  the  inner  vortices  are  asymmetrically  shed 
(the  right  one  is  about  to  move  downward  and  out  along  the  combustor  surface; 
the  left  one  will  grow  and  move  upwards  until  it  reaches  an  elevation  of  the 
right  one),  distorting  the  annular  vortices  asymmetrically.  Thus,  the  flow 
field  is  dynamically  changing,  and  an  axisyaaetr leal  model  is  inadequate  for 
this  flame.  The  dark  region  near  the  central  nozzle  exit  and  between  the 
Inner  and  outer  vortices  is  fuel,  which  is  turned  at  the  forward  stagnation 
point  and  moves  downward  to  the  combustor  surface,  then  outward  to  the 
boundary  of  the  recirculating  zone,  where  the  blue  flame  appears.  The  inner 
and  outer  vortices  are  green  Indicating  they  contain  T10£  particles.  An 
important  question  that  is  not  answered  is  why  the  TiO->  particles  occurs  in 
the  central  Jet  region  (the  inner  vortices)  -  since  TIO7  particles  are  formed 
from  the  reaction  of  TiCl^  with  water  vapor  which  is  one  of  the  combustion 
products.  A  possible  explanation  is  that  these  TiC^  particles  may  have  come 
from  the  fuel  line  before  the  nozzle  exit. 

For  V  >  1.6  m/sec,  the  vortices  appear  as  the  flame  attaches  to  the 
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surface  for  low  VCQ  (the  order  of  magnitude  is  centimeters  per  second),  and  no 
stationary  vortices  could  be  observed  for  detached  flames.  However,  the  flow 
field  and  flame  are  disturbed  violently  as  vortices  are  shed  near  the  tip  of 
the  central  jet  for  detached  flames.  The  shed  vortices  first  move  downward, 
outward  and  then  upward  along  the  recirculation  zone  boundary.  The  overall 
flame  structure  also  moves  with  these  shed  vortices.  The  flame  becomes 
attached  again  from  the  detachment  if  VCQ  is  increased  above  a  certain 
value.  Vortices  due  to  the  annular  jet  fora  near  the  combustor  surface 
again.  Thus,  it  may  be  regarded  that  the  large-scale  annular  jet  vortices  in 
the  recirculating  zone  are  very  important  for  the  flame  attachment.  These 
vortices  are  not  observed  in  the  detached  flame.  For  Test  III,  reattachment 
was  not  observed  -  blow-off  usually  occurs  when  the  central  jet  velocity  is 
slighcly  increased  after  the  flame  is  detached.  Probably,  the  spaces  between 
the  two  jets,  and  of  the  entire  recirculating  zone  are  so  small  that  only  very 
small  amount  of  the  fluid  circulates  in  the  recirculating  zone.  Therefore, 
large  bluff  bodies  and  small  central  nozzles,  that  i3,  large  values  of  and 

,  have  beneficial  effects  on  the  flame  stabilization. 

In  Place  i-b,  where  the  blockage  ratio  is  only  32?,  TiO->  particles  are 
added  to  the  fuel  jet,  thus  resulting  in  visualization  of  the  streamlines.  In 
this  case,  the  flame  boundary  is  smooth  and  extends  to  the  combustor 
surface.  The  flame  in  this  photograph  starts  at  the  outer  edge  of  the 
combustor,  contracts  downstream  first,  then  diverges  as  it  spreads  further 
downstream,  and  the  flame  thickness  also  increases  downstream.  The 
streamlines  in  the  recirculating  zone  diverge  before  the  forward  stagnation 
point  (bright  horizontal  zone).  \o  streamlines  in  the  central  fuel  jet  reach 
the  flame  front,  which  is  the  case  for  the  Bunsen  flame  as  shown  by  Lewis  and 
von  Elbe  ( Ref .  29)  . 


The  flow  field  becomes  turbulent  when  the  flame  lifts  from  the  surface  at 


a  distance  less  than  one  diameter  of  the  inner  annulus,  ,  which  was  also 
reported  in  Ref.  ’ ,  and  measured  by  Ramohalli  (Ref.  32).  The  large 
fluctuations  of  the  flow  field  occurs  due  to  the  vortices  being  shed.  The 
small  unsteady  vortices  in  the  recirculating  zone  have  replaced  the  large- 
scale,  orderly  annular  air  jet  vortices.  The  central  jet  becomes  a  mushroom 
shape  (see  Plate  7).  The  flame  surface  is  violently  distorted.  The  blue 
flame  in  the  photographs  is  less  noticeable  than  it  is  in  the  laboratory.  It 
is  clear  from  the  photographs  that  the  flame  initiates  around  the  aft 
stagnation  point,  where  the  mean  velocity  is  very  small,  and  the  large 
fluctuations  there  are  instrumental  to  the  mixing  of  air  and  fuel.  The  flame 
is  confined  to  a  region  downstream  of  the  aft  stagnation  point.  This  differs 
from  Namazlan's  finding  (Ref.  7)  in  that  he  reported  that  the  flame  initiation 
was  around  the  forward  stagnation  point,  where  the  central  jet  terminated  on 
the  central  axis.  In  his  experiments,  both  the  central  and  annular  velocities 
were  much  larger  than  in  the  present  study,  and  the  fuel  was  methane. 

Although  his  geometry  is  similar  to  that  of  the  present  study,  our  present 
experimental  set-up  is  not  capable  of  obtaining  such  high  velocities. 

The  criterion  for  characterizing  the  flow  field  as  was  done  in  the  cold 
reacting  flow  is  extremely  difficult  owing  to  the  onset  of  combustion.  For 
exanole,  the  flame  may  be  attached,  detached,  or  blown  off  for  the  same 
annular  velocity.  3eer  and  Chigier  stated  (Ref  24):  "Although  geometrical 
similarity  can  be  maintained  for  studies  of  non-corapr essible  fluid  dynamics  in 
Isothermal  system,  it  has  to  be  abandoned  when  the  system  is  non-iso thermal  or 
when  chemical  reaction  plays  an  important  role  in  the  process  investigated." 
The  distribution  of  the  velocity,  temperature  and  species  concentrations  in 


the  flow  field  affects  the  chemical  reaction,  which,  in  turn,  Influences  the 
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flow  field  by  releasing  large  amount  of  heat.  Thus,  the  fluid  mechanics,  the 


heac  transfer,  and  chemical  reactions  are  coupled.  The  flow  field  is 


extremely  complicated,  no  relationship  between-^—  and  flow  conditions  as  well 


as  geometries  could  be  found  (experimental  data  for  the  combusting  flow  can  be 


found  in  Appendix  D) .  Such  a  relation  requires  considering  the  details  of  the 


flow  field  and  chemical  kinetics.  According  to  Damkohler  model  (Ref.  24), 


five  dimensionless  parameters  have  to  be  considered.  They  are: 


1.  chemical  reaction/ bulk  flow; 


2.  chemical  reaction/molecular  diffusion; 


3.  heat  released/ heat  transported  by  bulk  flow; 


4.  heat  released/heat  transported  by  conduction; 


5.  momentum  transported  by  bulk  flow/ momentum  transferred  by  viscosity 


(Reynolds  number) 


Normally  it  is  extremely  difficult  to  obtain  empirical  formula  using  the 


above  five  ratios  due  to  limitations  of  measurement.  Detailed  chemical 


composition,  temperature  and  velocity  measurements  are  needed  to  understand 


the  combustion  process. 


6.  Some  Comoarisons 


This  section  is  divided  into  two  subsections:  the  first  subsection 


presents  comparisions  between  the  pure  annular  free  jet  and  the  cold  reacting 


flow.  The  comparisons  between  the  cold  reacting  flow  and  combusting  flow  are 


given  in  the  second  subsection. 
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6 . I  Comparlalon  Between  Che  Pure  Annular  Jet  and  Che  Cold  Reacting  Flow 

The  introduction  of  the  central  jet  into  the  vortex  region  established  by 
the  annular  jet  changes  the  flow  pattern  in  the  recirculating  zone 
substantially.  It  may  push  away  the  vortices,  distort  them,  or  even  make  the 
irregular  small  vortices  take  the  place  of  the  large-scale  vortices  present  in 
the  case  of  the  pure  annular  jet.  The  results  of  this  interaction  between  the 
vortices  and  the  central  jet  depend  on  the  relative  magnitude  of  the  momenta 
of  the  central  and  annular  jets,  and  the  space  between  two  jets  (or  D^-Dj  )  . 
these  are  shown  in  Plate  1 — b ,  Plate  2,  3  and  4-a  as  well  as  in  Figures  3,  5 
and  7 . 

Figure  8  shows  that  when  the  central  jet  velocity  is  Increased  from  zero 
(pure  annular  jet)  to  penetration  velocity  (when  the  central  jet  penetrates 
through  the  recirculating  zone,  i.e.,  when  L  ■  Lr2  »  Lp) ,  the  length  of  the 
recirculating  zone,  Lrz  ,  increases  from  its  value  for  the  pure  annular  jet  to 
the  penetration  length,  Lp.  At  penetration,  L  -  Lrz  *>  Lp .  The  presence  of 
the  central  jet  causes  the  aft  stagnation  point  to  move  further  downstream. 
Thus,  the  central  jet  effectively  changes  the  shape  and  extent  of  the 
recirculating  zone.  However,  Fujii  et  al .  (Ref.  16)  found  chat  the 
introduction  of  the  central  jet  into  the  flow  field  behind  a  bluff  body  placed 
in  a  ducted  stream  shifted  the  recirculating  zone  upstream,  this  is  contrary 
to  our  finding.  Figure  8  also  3hows  that  the  effect  of  the  central  nozzle 
diameter  on  the  length  of  the  recirculating  zone.  At  the  same  central  jet 
velocity,  Ltz  is  larger  for  the  larger  central  nozzle  diameter.  This  is 
probably  due  to  the  larger  momentum  of  the  central  jet,  which  is  proportional 
to  the  nozzle  exit  area.  When  the  velocity  of  the  annular  jet  is  increased, 
the  influence  of  the  central  jet  on  the  length  of  the  recirculation  zone  is 
reduced.  For  large  annular  velocity,  as  reported  in  Ref.  3,  the  length  of  the 
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recirculation  zone  Lfz  Is  almost  constant,  and  independent  of  the  central  jet 


velocity.  Thus,  Lrz  «  Lp  in  this  case. 

6 . 2  Comparison  3etween  Cold  Reacting  and  Combusting  Flows 
The  spreading  of  the  detached  and  attached  flames  leads  to  two  different 
phenomena  from  that  of  the  cold  reacting  flow.  For  the  attached  flame,  as 
^escribed  before,  the  flow  is  laminar,  thus  along  the  boundary  of  the 
recirculating  zone,  only  species  diffusion  could  occur  as  the  means  of  the 
mass  exchange  across  the  boundary  except  the  region  very  close  to  the 
combustor  surface.  Probably  a  scoichiometr ic  fuel-air  mixture  occurs  in  the 
immediate  vicinity  of  the  combustor  where  the  flame  is  blue.  Then  the  flame 
spreads  downstream  along  the  boundary  surface,  converging  at  the  central  axis 
around  the  forward  stagnation  point  developing  further  downstream  (see  Plate 
9).  In  this  case,  the  fluid  viscosity  is  increased  very  much  (approximately 
19  times,  see  Ref.  3).  Thus,  compared  wich  the  cold  reacting  flow,  this 
results  in  the  faster  growth  of  the  boundary  layer,  which  starts  at  the 
separation  point  (outer  edge  of  the  combustor)  where  its  thickness  is  zero. 
Therefore,  the  onset  of  combustion  reduces  the  recirculating  zone.  As 
observed  from  the  experiments,  the  forward  and  aft  stagnation  points  are  moved 
closer  to  the  combustor  surface  for  the  combusting  flow  than  for  the 
corresponding  cold  reacting  flow  (e.g.,  compare  Place  4-b  to  Plate  2-b) . 

L. 

Figure  9  3hows  or*-  vs.  R,  for  the  cold  reacting  flow  and  the  combuscing  flow 
D .  3 

i 

(attached  flame  only).  It  is  clear  chat  the  combustion  causes  the  penetration 
length  or  the  recirculating  zone  length  to  be  reduced  by  more  than  half. 

Thus,  it  is  much  easier  for  the  central  fuel  jet  to  penetrate  through  the 
recirculating  zone  in  the  combusting  case.  The  penetration  velocity  Increases 
wich  the  annular  air  velocity  for  both  cold  and  combusting  flow  cases. 
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However,  Che  measured  value  VCQ  at  penetration  (i.e.,  Vp0)  and  Its  Incremental 
change  corresponding  to  an  Incremental  change  In  Vao  Is  much  smaller  in  the 
presence  of  the  flame  (0,5  ~  1.0  times  smaller)  than  chose  for  the 
corresponding  cold  reacting  flow.  This  may  be  due  co  the  corresponding 
reduction  of  the  recirculating  zone  length  in  che  attached  flame.  The 
shortening  effect  of  che  laminar  flame  on  the  length  of  che  recirculating  zone 
was  also  observed  by  Lewis  and  von  Elbe  for  the  flow  behind  che  end  of  a  small 
cylinder  inserted  into  a  low-velocity  stream  (Ref.  29).  However,  their 
results  were  for  a  premixed  flame. 

For  che  detached  flame,  the  flow  field  i3  violently  disturbed,  perhaps 
due  co  the  sudden  expansion  of  combusting  mixture,  turbulence,  and  the 
shedding  of  vortices.  The  flame  first  appears  in  the  region  between  the 
forward  and  aft  stagnation  points  (closer  to  the  aft  one).  It  was  observed 
that  the  forward  stagnation  point  in  the  detached  flame  is  shifted 
significantly  closer  co  che  combustor  surface  compared  to  the  cold  reacting 
flow;  and  the  aft  stagnation  point  moves  slightly  downstream.  Quanti tatlve 
values  were  not  obcained  due  co  limitations  of  the  present  experimental  set¬ 
up.  This  finding  is  contrary  to  Namazlan' s  result  (Ref.  7),  which  showed  that 
the  fuel  jet  had  greater  height  for  the  combusting  flow  chan  for  the  cold 
reacting  flow.  3ut  it  should  be  noted  that  Namazian  used  methane  as  fuel  and 
che  exit  velocities  of  the  fuel  and  air  were  about  10  times  greater  chan  in 
this  study.  The  prolonging  of  the  recirculating  zone  was  also  reported  in  the 
literature  for  bluff-bodv  flame  stabilizers  inserted  in  premixed  streams  in  a 
duct  (e.g.,  see  Ref.  15  and  30). 

Due  to  che  reduction  of  the  recirculating  zone  with  attached  flames,  the 
vortices  sizes  are  also  limited.  However,  the  vortices  seem  more  orderly, 
stationary,  and  intense.  These  have  been  presented  in  the  previous  sections. 
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Analytical  Accroach 


The  flow  field  behind  a  combustor  Is  so  complex  chat  no  analytical 
solution  nor  numerical  solution  for  unducted  flow  are  available.  The  present 
analytical  approach  Is  made  possible  by  employing  the  scaling  method  proposed 
by  3ejan  (Ref.  31)  even  without  knowing  the  details  of  Che  flow  field.  Due  to 
the  extreme  complexities  In  the  combusting  flow  case,  the  analyses  here  are 
only  given  to  the  pure  annular  air  jet  and  the  cold  reacting  flow  cases. 

The  governing  equations  are  continuity  and  momentum  equations  expressed 
in  cvlindrical  coordinate  as  follows: 
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3v  these  equations,  we  have  assumed  that  the  flow  field  is  steady  and 
axisvnmetrlcal ,  and  the  gravitational  effect  is  negligible. 


’  .  1  Pure  Annular  .Air  Jet 

Sv  scaling  method,  the  Equations  (-O-(b)  can  be  expressed  for  the  flow 
around  the  recirculating  zone  as 


(3) 
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where  ur  and  u,  -should  be  regarded  as  charac teristlc  velocity  of  the  flow 
field  around  the  recirculation  zone.  Similarly,  r  and  z  are  characteristic 
length . 

Substituting  Eauation  (7)  into  (3)  and  ^9),  then  eliminating  pressure 
terra  gives 
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The  solutions  are 


(11) 


u  ~ 
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(12) 


Now  for  the  flow  around  the  recirculating  zone,  from  the  mean  velocity 

distribution  along  the  centerline  reported  in  the  literature  (e.g.,  Ref.  11 

13  and  22),  it  may  be  assumed  that 

u  -  V  : 
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Thus,  Equation  Ml!  becomes 


and  Equation  (12)  leads  to 
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Therefore,  the  solutions  of  Equation  (14)  are  obtained 


(15) 


(16) 
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suitable  for  the  laminar  flow  in  which  case  the  length  of  the  recirculating 


zone  Increases  with  Ra.  Equation  (15)  shows  that  if  R,  -  0,  i.e.,  “  0,  no 
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recirculating  zone  could  exist.  Equation  (16)  appears  to  be  valid  for  the 
transition  flow  region,  and  Equation  (13)  appears  to  be  valid  when  the  flow  is 
fully  turbulent  ( Ra  *  «) .  For  example,  some  authors  like  Durao  and  Whitelaw 


Ref.  11)  reported  tnat  for  very  large  Ra  (about  10^),  was  constant.  The 


transition  region  and  fully  turbulent  flow  region  (Equations  (13)  and  (16)) 


will  be  combined  as 


-C2  +F 


Thus,  there  are  two  adjustable  constants  (Cj  and  C2 ) .  Fig*  4  3hows  the 


results  when  Cj  is  set  equal  to  0.006  and  Ci  Co  0.934.  These  results  are  in 


general  agreement  with  the  experiments. 


7.2  Cold  Reacting  Flow 


Because  of  the  fact  that  the  region  of  subacaospher ic  pressure  behind  a 


bluff  body,  formed  by  bending  streamlines,  i3  3et  up  by  the  annular  air  jet, 


it  may  be  valid  to  assume  that  for  both  jets,  the  pressure  gradients  in  the  r 


direction  which  cause  the  annular  streamlines  to  converge  radially  Inward  and 


the  central  Jet  streamlines  to  diverge  outward  are  at  the  same  order  of 


magnitude  (they  are  comparable),  i.e., 


'IE)  ~  'l£l 

■  3r '  a  -  3r '  c 


Ag  ain  using  scaling  arguments,  the  following  assumptions  for  the  central 


flow  are  made: 


u  -  V  ; 

CZ  CO 


z  ~  L; 


r  -  D.  . 


Thu9  ,  Equations  f 4 )  and  (5)  become 


c  r  co 


0 


where  L  Is  Che  vocation  of  the  forward  stagnation  point  along  the  z  dxls « 
Likewise,  for  the  annular  air  jet,  it  is  assumed  chat 


az  ao 


Thus,  applying  Eqs.  '  *»  )  and  (5)  Co  che  annular  jet  leads  to 


j _ ,^2_s  +  -  ar  ^  _a_r  . 


Combining  Equations  (’.8)  with  (19),  and  (20)  with  (21),  then  using  relation 
(l7)  gives  the  following  equation: 
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and  Erz  has  been  replaced  bv  Dj  since  from  the  measurements  — —  Is  order  of 

D1 

unity  and  changes  onlv  sllghtlv  (e.g.,  see  Figure 

r  t 

*' : w  If  R  >o  jr—  *  t-*-  (which  It  Is)  ,  the  second  term  Is  negligible 
compared  with  the  flrsc  term  on  the  left  hand  side  of  the  Equation  (22). 


El  kewl  se  ,  If  R  , 


D  -0. 

>>  -  rwhlch  It  Is),  the  second  term  on  Che  right  hand  side 

31 


of  che  same  equation  can  be  neglected  compared  with  the  first  cerm.  Thus, 
Equation  122-  reduces  to 


'sH 


It  is  remarkable  co  noce  chac  Eg.  '23),  our  very  simplified  analytical 
result,  appears  to  be  exactly  the  sane  as  that  obtained  from  the  experimental 
lata,  Eg.  '3'.  From  the  definition  of  E 


j  o 

a  a 


-c.34,?.5 


where  y  ^  and  y  are  the  dynamic  viscosities  of  the  fluids  In  the  annular  and 
central  Jets,  respectivel v .  It  has  been  shown  here  that  the  constant  A  In  Eq  . 
'3)  Is  a  function  of  the  physical  properties  of  the  fluids  in  the  two  Jets  as 
presented  before,  i.e., 

A  -  3E 

where  3  is  a  constant.  "sing  the  equation  of  state  for  the  perfect  gas,  we 


where  and  ^  are  the  molecular  weights  if  the  fluids  flawing  In  the  annular 
and  central  *ets.  Table  3  gives  the  values  of  a  (fro®  Ref.  3b)  and  h  from 
Ref.  ?A;  fir  propane,  air  and  methane  corresponding  to  the  fluids  ised  in  the 
experiments  of  this  st  idv ,  Tankin  Ref.  1')  and  S'aaazl  in  Ref.  T^e  val  tes 

if  A.  3,  and  F  torres pend i ~g  t i  these  studies  are  given  in  Table  .  where  the 
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Reynolds  number  and  rends  to  approach  a  constant  value  of  the  order  of  unity 
for  large  annular  Reynolds  number  in  the  case  of  the  pure  annular  air  flow. 

' 1 )  For  the  cold  reacting  flow,  an  empirical  formula  for  the  axial  location 
of  the  forward  stagnation  point  in  terms  of  the  exit  flow  conditions  and 
nozzle  diameters  is  found: 

t  R  0,  ,  ,  D  -D, 

L  c  1.1.5.  o  1  - 

D.  ’  A  R  •  D.  0. 

1  a  j  i 

The  introduction  of  the  central  jet  into  the  recirculating  zone  causes  the  aft 
stagnation  ooint  to  move  downstream  and  Increases  the  size  of  the 
recirculating  zone.  However,  if  the  annular  air  velocity  is  less  than  1.5 
m,  sec,  no  regular,  orderly  recirculating  zone  could  be  formed. 

'31  If  the  annular  air  velocitv  is  less  than  1.6  a/ sec,  the  flame  is  alwavs 
attached  to  the  combustor  surface,  if  the  annular  air  velocity  is  greater  than 
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D  =  53 . 2  mm 
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D .  =  38.5  mm 
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D j  =  6.35  mm;  9.45  mm;  12.7  mm 


Fig.  2a.  Schematic  drawing  of  fuel  and  air  nozzles 
used  in  Test  I. 
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?h  showing  the  measurement  of  the 
£  the  recirculation  zone  for  pure 
air  flow. 


late  5a.  Photograph  of  ccnbusting  flow  (no  sheet-lighting) 
for  Test  I;  air  velocity  1.08  a/sec,  fuel  velocity 
0.0258  a/sec. 
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data  :i# ityp/5.4/ 

CALL  DRIVE (In, ITYP  ) 
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END  J 


SUBROUTINE  CRlVEi I'/ITYP) 


OP  IVE 

***** 

CONTROL  TrtE  FLOW  OF  THE  WHOLE  PROGRAM 
SUBROUTINE  CALLED 


VARIABLES 

********* 

IN  — NUMBER  OF  Tm E  EXPERIMENTAL  DATAA  SETS 

ITYP — VALUE  OF  ITYP  CONTROLS  THE  P»INTQUT(SEE  MAIN  PROGRAM) 

N  — NUMBER  OF  m£4SU(?chenT  J0INTS  FOR  EACH  EXPERIMENTAL  CATa  SET 

SCAlEA — SCALE  REAOING  OF  FLOWMETER  FOP  AIR 
T  — TEMPERATURE  OF  THE  L  A  S (  '  C  ) 

AREIN— AREA  OF  INNER  NOZZLE  ( IN**2  • 

AREOT — AREA  OF  OUTER  NOZ ZL E ( I N**2 ) 

WFIJM  —WEIGHT  OF  FUEL  MOLECULE, FOR  PROPANE,  WFUM.44.097 
HEIMAX, HE TF — MAXIMUM  HEIGHT  AND  HEIGHT  OF  FUEL  JET, 

RESPECTIVELY  (IN) 

SCAIFM,$CALEF— MAXIMUM  SCALE  READING  AND  SCALE  READING  OF 
FLOWMETER  FOP  FUEL 

p,  PM— -FUEL  GAUGE  PRESSURE  AT  FLQWME TERROR  FOR  PENETRATION  ( K  P  a  ) 
VORL,VOPR—  HEIGHTS  OF  LEFT,  RIGHT  VORTICES  (IN) 

DIMENSION  M(5),X(100,10),Y(100»10) 

CCmmqn  /VALUE2/  X , Y 

DATA  X,v  /1Q0C*0. 0,1000*0.0/ 

DO  500  1 1  *  1 , 1  M 
P  E AD ( 5 , * )  n, SCALEA, T, 01 
m ( II ) «N 

»I*4.0*ATAN(1.0) 

02*1.514 

03*2.394 

APEQT«(Q3*O3-02*OZ)*PI/4.O 
AP£IN*PI*0 1*0 1/4.0 
WFUM-44 .097 

CALL  CONVT( AREIN,APEAIN,2) 

CALL  CONVT( AREOT, AREAOT/2) 

CALL  AIRVEL (SC ALE  A, A»E ACT, VEL AMS) 

R  £  AD  (  5,  *  )  hEImaXjSCALF**,®* 

CALL  CENCV(  SC  At  F  *,  om,T,  AREA  IN,  VEL  -AX,  WFL'7,2) 

DO  10  1*1, N 

READ! 5,*)  SCALER, R,VDRL,VCRP, HE  IP 
CALL  NONOIM(MEIF,HEIMAY,^EINON) 

CALL  C£NFV( SCALEF,P, T, ASEAIN, VELPMS, wFU-,2) 

CALL  NOND!“(VELCMS,VEL“AX,FUL‘'ON) 

CALL  ST:pE2(FUIN0N,hEINCN,:,I1) 

CALL  C0NVT(H=IF,MEIFMS,1) 
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CALL  R=ST08(N) 
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’030 

IF( ITYP.E3.2)  CALL  DRAw(N,0,»,I11 

1*00 
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CONTINUE 
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SL3R0UT  IN£  AIR/ELt SCALE, ARE  AIT, VE LAPS) 

CALCULA6[',m  of  VELOCITY  OF  ANNULAR  AIR  FRQ-  SCALE  READING  GF 
PlO-McTER 

VARIABLES 


SCALE  — SCALE  READING  3F  FlCW-ETER  =  nR  ANNULAR  AIR 
AREADT — AREA  OF  OUTER!  ANNULAR  1  NOZZLE  tC-**2) 

VELA.NS-*  'ELCCITT  CF  AIR  (-/SEC) 

DIMENSION  VCLFR(IO) 

DATA  VQLFR/C.fc#I. 2,1. 3,2. 025,3.325,3. 65,0. 25, 0.95, 5. 05,6. 075/ 

CC  100  I-l, 10 
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END 


3  L  3  ®  0  U  T  INP  CENPV(SCALE#P*T,AREAIh,vELF-S#WPU-»ISIZE) 
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I*  — NUM9ER  OF  T^c  EXPgS  I*£NTAL  3ATAA  SETS 

ItY® —  VALUE  OF  1 77  P  CONTROLS  THE  PBINT0UT(SEE  MAIN  POQGRAM) 

N  — number  OF  MEASUREMENT  POINTS  FOP  EACH  EXPERIMENTAL  DATa  SET 

SCALEA—  SCALE  READING  OF  FLOWMETER  FOR  AIR 
T  — TEMPERATURE  OF  THE  LA8(*C> 

AP  E  IN— ARE  A  OF  INNER  NGZZIE  ( IN**2  ) 

AFEOT— AREA  OF  OUTER  nOZZLE(IN**2) 

WFU*  — WEIGHT  Or  FUEL  MOLECULE, FOR  PROPANE, WFUM-44, 007 

HEI*1AX,HEIF— maximum  height  ano  height  of  fuel  jet, 

RESPECTIVELY  (IN) 

SCALFM,5CALEF— MAXIMUM  SCALE  PEADING  AND  SCALE  READING  OF 
FLOWMETER  FOP  FUEL 

p,  PM— FUEL  GA'JGc  PRESSURE  at  flowmeter, or  for  PENETPATIQN  (kp  A) 
VO»L,VOPR  —  HEIGHTS  OF  LEFT, RIGHT  VORTICES  (IN) 

OIMEnsICN  3(5l,X< 100,10),Y(100,10) 

COM-on  /VALUE2/  X, Y 

OAfA  X , v  /1C0C*0, 0,1000*0.0/ 

00  500  11-1,1* 

®  EAO ( 5, *)  n,5CALEA,T,D1 

-  ( 11) *N 

»I»4.0*ATAN(1.0) 
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o  a  r 

9  90 
900 
°I0 
920 

9^6 

94J 

950 

946 


R  EAO ( 5, * )  nEIMAX, SCALP", P* 
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00  10  I *1, N 

PFA0(5  ,*)  SCALEF,p,V3RL,VCRP,HEIF 
CALL  :(OnOIM(hEIF,HEI*AX,meInon> 

CALL  CE*FV{ SCALEF,P,r, area  in, VELF"S,wFU“,2) 
CALL  MONO  I  *MVEL=MS,VEL  “AX,  FULTON) 

CALL  STOP®  2 (FUL NON, HE  I  NON, I,  1 1 ) 

CALL  C0NVT(HEIF,MEIFM5,i) 


-«y»  ,  •  . 


Q-»0 
0  8C 
QQr 

irnn  i  o 
1  CIO 
lO’O 
’030 

1"40  5C0 
!  "60 
106C 
l^TC 

1070  t no 
1000 
1100 
1110  c 

1120  C 
1130 
1140  C 
IT  50  C 
1100  0 
1170  C 

n  ao  c 

1100  C 
1  200  C 
1210  C 
1  270  C 
1*30  0 
1240  C 
1250 
1260 
1270  C 
1  7  0  0 
12QO 
1300 
1310 
13  20 

’330  ICO 
1340  200 
1350 
1  360  0 
1  37C 
13  30 

1^0  c 

1400  c 

1410 
1420  r 
1430  C 
1440  c 

1 450  : 

1460  C 
14?0  0 
1400  c 
1 45c  : 

1  5C0  C 
1510  C 
1  *20  0 
1  e  30  C 
1  540  r 
1  35  0  C 
1  560  C 
i  e-To  : 
1590  : 

1  «O0  0 
1*00  C 
1610 
1  *70 


CALL  CO,NVT<  VJRL,VCRLFT,1) 

CALL  CONVT( VDFR»VaPRIG,l) 

CALL  STOREl  <VFLF«S,HEIFMS,  VORLFT,  VORR  IG,rlEINON,I  ) 

CONTINUE 

CALL  R  E  STOP ( N  ) 

CALL  P9INT(N, A»£  AC  T>A=  =  AIH, VELARS, ID 
IF(ITYP.C3«2)  CALL  OR  A w ( N , 0, 2 » 1 1 ) 

CONTINUE 

ro  600  ii-i,i- 
►'•-CD 

IF(  ITY0.5E.3)  CALL  FCTOET ( N  ,  II, ITYR, I  -  ) 

CONTINUE 

RETURN 

£N0 


SUBROUTINE  AIR  V  ELI  SCALE, AREA3T, VELARS) 

CALCULATION  of  VELOCITY  OF  ANNULAR  AIR  FROM  SCALE  RE  AO  ING  CF 
FLOWMETER 


VARIA3LES 

«»»*«**** 

SCALE  — SCALE  READING  OF  FLOWMETER  FOR  ANNULAR  AIR 
AREAOT — AREA  OF  3U TE A ( ANNUL  A R  )  NOZZLE  (CM**2) 

VELAMS— VELOCITY  OF  AIR  (-/SEC) 

DIMENSION  VCLFR(IO) 

DATA  VOLFR/C. 6, 1.2, 1.8, 2. 42 5, 3.025,3.65,4.25,4.95,5.45,6.075/ 

DC  100  1-1,10 
IFISCALE/10.E0.I)  THEN 
VOL-VOLRRd) 

GO  TO  200 
E  NO  IF 
CONTINUE 

A  3 -0 . 3043 

VE. AMS -VOL »A8*A3*AB/60.0/ ARE A0T*1 0000. C 
-/SEC  F T* -  3 — >M**3  min  —  >SEC  Cm*»2 — >M**2 
RETURN 
END 


SUBROUTINE  CE NFV(  SCALE, P,T,AR6AI*i,VELFMS,WFUM,  IS  IZE) 

CALCULATION  OF  VELOCITY  OF  CENTRAL  FUEL  JET  FPCM  THE  SCALE 
READING  OF  GILMCNT  FLOWMETER  ,  CATALOG  NO.  1 1  CO,  SIZE  DIF 
IOrZE-l;OR,CATALO  no.  R1200,SIZE  2, IF  I S I Z E ■ 2 ; OR » C A TAL CG  NO. 
F 1300, SIZE  3, IF  ISIZE-3. 

VARIABLES 

*«*•*«*** 


SCALE  —SCALE  5  5  A  0  I N  G  CRQM  FLOWMETER 
p  —GAUGE  PRESSURE  AT  FLOWMETER  ( K ? A  ) 

T  — TEMPERATURE  inside  lab  c • C ) 

A  3  E  A  I  N— A  5  E  A  OF  INNER  (CENTRAL)  NOZZLE  (CM**2) 

VELF’lS— VELOCITY  OF  FUEL  (M/SEC) 

WrU-  — .EIGHT  OF  FUEL  MOLEC'JLE»FOP  PRO o AN E  WFUM-44.097 

F  OR  The  FORMULA  USED  here, please  SEE  GILMONT  FLOWMETER 
SPECIFICATION  fqp  SIZE  1  OR  2, OR  3. 


Rl-101325. 0-R*lC00.0 
T I  -  T  ♦  7  7  3 . 1  1 


?  2  ^0  C 
MdO  C 
?310  C 

23 zn  c 
2330  C 

J  3  4n 
23  50 
7  3  60 
2320  o 
23  60  C 
73  gn 

74C0  C 

2^10  : 

2420  C 
’430  C 
2440  C 
24?0  c 

24<-0  C 
2470  0 
2430  0 

24 go  C 
2*00  C 
2510  C 
2*20  C 
2  5  30  0 
2  f  40  0 
2550  C 
2*60  C 
2520  0 
’  5  °0 
2500 
’600 
2610 
2620 
2630 
2640 

’fc 50  : 
2660  C 
2620 
’6  50  C 
2600  3 
’700  C 
271  0  0 
’720  C 
”30  C 
2240  2 

?’en  0 
2760  0 

777"  0 

2290  0 

’2qn  0 
2 a00  C 
2*10  0 
7*20  C 
2  9  30  C 

2  9  40  0 

2°  50  0 

2  960 
2*70 
Joan 
Jo  gn 
Jqnn 
’OlO 
7o?n 
7930 
2940 


VALJC3— THE  VALUE  TO  BE  NQND  I*ENS ICNALIZEC 
VAL-AX  —  THE  REFERENCE  VALUE  WITH  RESPECT  TC  WHICH 
VALUES  WILL  8E  NCNDIMEN5I DUALIZED 
VALNON--NCN 01  SESSIONAL  I  ZED  VARIABLE 

VALS3N-VALNES/V  AL.2AX 

R£T'J®N 

END 


SUBROUTINE  STO°E’( FULNCN»hEInON,I,I1) 

STORE  HERE  ALL  THE  NONOI -E NS  I  ON AL IZEC  VARIABLES  WHICH 
WILL  BE  BLOTTED. 

VARIABLES 

********* 

cULNON — CUEL  VELOCITY 

H  E I  NON — HEIGHT  OF  CENTRAL  J  E  T 

VCR  NON — “FAN  HEIGHT  OF  VCkTICES 

I  — NUMBER  OF  ACTUAL  DATA  SET  TO  BE  STCcEO 

COMMON 


VALUE2 — X<w&X0AT»10)  «  X-VALUE  FOR  THE  SCATTER&RAMS  AND 

THE  CURVE  FITTINGS 

Y(-AXCAT»1C)  !  Y-VALUE  FOP  THE  SAME  THING  AS  ABOVE 

PARAMETER ( NAXDAT-100 ) 

01, -ENSIGN  X  (NAX0AT.10) »YIMAXDAT,10) 

common  /  values  /  x,y 

X  ( 1/  ID-FULNCN 
v  (  I  *  1 1 ) *H£ INON 
P  E  TUP  N 
END 


SUBROUTINE  STOP  El ( VEL FUL , HE  INS, VORLMS , VCRP MS , PEN, I ) 
ST-RE  ALL  THE  PHYSICAL  VALUES  IN  THE  COMON  'SAVE1' 

VARIABLES 

********* 

VELeUL— VELOCITY  OF  THE  FUEL 
hEIMS  —HEIGHT  cf  THE  central  jet 

VCRLHS — HEIGHT  OF  THE  LEFT  VnRTEX 

VCRONS - lEIGHT  OF  THE  RIGHT  VORTEX 

PEN  — REGISTRATION 

i  — nu-be0  of  actual  oata  set  to  be  stcred 

CC-MON 


SAVE1 ( 5»MAX0AT| — CONTAIN  ALL  THE  RHYSICAL  DATA  TO  BE  PRINTED 

RARA-ETER ( -axDaT-100) 

DIMENSION  SAVE1 ( 5» MAXOAT ) 

C  CM, -ON  /  VALUE1  /SAVE1 
SAVE  1  (1/D-VELFUL 
SAVE1(2»II«HEI-S 
SAVEIOj  I)  •  VORl  MS 
SAVE1(4,I) -VOPRMS 
SAVEl(5»n  -PEN 
RETURN  34 -84 


..(VVV>  v  V  .v :  p  :•*.  -W  <-/ -/ 


>Vvv/Vy'-'>.vv/ 


’^60  C 
’970 
7QPQ  0 
7990  C 
3000  C 
3010  C 
’020  C 
’030  C 
30*0  r 

30*0  : 
30*0  C 
3070  C 

?oeo  o 
3090  C 
3100  C 

’110  c 

3120 
31’C 
31*0 
31*0 
3160 
3170 
’180 
3190 
3200 
’’10 
3220 
’230 
’’*0  10 
3250 
’’60 

’’70  ICC 
3  2B'’ 

3290  500 
3300  510 
3310 
33’0 
3330  C 
’  3*0 
3350  0 
3360  C 
3  ’  70  0 
3  ’  30  (* 

33  90  C 
3*00  o 
3*10  C 
3*20  : 
3*30  o 
3**0  o 
3*50  C 
’*60  C 
3*70  C 

’*80  C 

’*90  C 
3500  0 
’*10  C 
3520 
’530 
’5*0 
3*50 
’*60 
3  5  70 
3*90 

3  590 
’*00 


SUBROUTINE  PESTOR(“AX) 


REARRANGE  the  EX0EPI.3E.STAL  data  STORED  IN  COMMCN  •VAL'JEl' 
SUCH  THAT  the  VELOCITY  values  ARE  IN  AN  INCREASING  ORDER. 

variables 

********* 


MAX —  NIJM3EP  OF  DATA  SETS  STORED  IN  VALUE1 

common 

****** 

VALUEl — SAVE1(5,MAX0AT)  :  THE  EXPERIMENTAL  CATA  TO  8E  PRINTED 

PARA'<ETERC<AXDAT»100) 

DIMENSION  SAVE1  (  5,  MAXOAT)  ,TE«R<5> 

LOGICAL  LOG 

COMMON  /  VALUEl  /SAVE1 
DC  500  1*1,1000 
LOG*. TRUE  . 

00  100  J  *  2  ,  M  A  X 

IF(SAVEI(1,J).LT.SAVE1(1,J-1))  then 
00  10  5*1*5 
TEMP(K)-SAVE1<K,J) 

S AVE1 ( K, J ) -SAVE1C  K#J-1J 
SAVE1 ( K, J-l) *TEMP (K  ) 

CONTINUE 

LOG*. FALSE. 

END  IF 
CONTINUE 

IF (LOG!  GOTO  51C 
CONTINUE 
CONTINUE 
RETURN 
END 

SU3O0UTIN6  PRINT(MAX, AREAOT, AREAIN, VELAIP, J ) 

CREATE  A  TABLE  OF  VALUES  FOR  EACH  EXPERIMENTAL  DATA  SET 
VARIABLES 


MAX  — NUMBER  OF  DATA  SETS  STORED  IN  C  GMMON  'VALUEl' 

AREACT —  AREA  OF  OUTER  NOZZLE 
APEAIn — AREA  OF  INNER  NOZZLE 
VELAIR — VELOCITY  OF  AIR 

I  — NUM0EP  OF  THE  ACTUAL  EXPERIMENTAL  SET 

COMMON 

****** 

VALUEl --3AV El (5*maX0AT)  :  PHYSICAL  VALUES  TO  3E  PRINTED 

?  ARAMETER ( “AX0AT-100 ) 

DIMENSION  SAVE1 ( 5* MAXDAT) 

CHARACT£R*3  PEN 
COMMON  /  VALUEl  /  SAVE  1 
WBITE16#  '  i  "1"  )  '  ) 

WRITE (6,901) 

*RITE(6»Q'0  5)  'TABLE  of  VALUES  FOR  FXPE9ImENTAL  data  set  *,J 
WRITE(6.901  )  34.83 


W®  ITE (6, 901 ) 
<P  ITE (6, 302  ) 
WPITE(6,302) 
WPITE(6,902> 
W9ITP (6,301) 
WPITE(h,«01) 
«t 9  I TE  (6,301  ) 
WRIT£(6,303) 

2 

WR  ITE  ( *>>  90  2  ) 

) 

W»ITE(6,303> 


•AREA  OF  CUTE®  MCZZL E * , AR E ACT, 
•AREA  CR  INNER  NOZZLE ARE  AIN, 
•VELOCITY  OF  AIR  '/VELAIP, 


CM**2  • 

"-/SEC  ' 


'VELOCITY 
'HEIGHT  OF 
•OF  FUEL 
'LEFT  VORTEX 
'[  H/SEC  1 
'  t  M 1*  1 


*R  ITE  (  *>,  301  ) 

DO  100  I  *  1 , HA  X 

OCN|»,  I 

I F ( S AVE 1 ( 5, I )  .GT.0.9) 


•HEIGHT  OF 
'HEIGHT  OF 
•CENTRAL  JET 
•RIGHT  VORTEX 

I  (  M  M  1 

'  I  MM  ) 


'  (*>  ' 


HRITE(6,30A)  (SAVElfK, 
CONTINUE 
JR  ITE (6,301 ) 

WRITE  ((>,301)  'THE  0 E n TR A 
RET:j»N 

eGPMAT(2X> A ) 

FCRMAT(2X, A,F10.4,  A) 
FCRmaT(4X,4(A,6X)  ) 
FGR-AT(1X,4(F10.4,8X)jA) 
F0RYAT(2X, A,  12) 

E  NO 


(SAVElfK, I), K«l,4), PEN 


'THE  BENTRATION  POINT  IS  SIGHED  9Y 


SUBROUTINE  DRAW (NMES,NPTS, I,N ) 

CREATE  THE  SCATTEPGRAM  OF  THE  NONO IHENS ION AL I Z ED 
DATA  ANO  THE  PLOTS  OF  THE  CURVES 

VAR  IA3LES 


MHES — NUM3EP  OF  MEASUREMENT  POINT 

MPTS —  NLIHBEP  OF  ROINTS  FOP  THE  PLOT  OF  THE  CURVE 

I  —number  OF  PLOTS  TO  3E  MACE 

N  — NU*9ER  CF  THE  ACTUAL  EXPERIMENT 

C  CMMCN 


VALUE2— X ( m AXOAT, 10)  :  X-VALUES  OF  The  POINTS  TO  3E  PLOTTED 
Y(MAXDAT,10)  :  Y- VALUES  OF  THE  POINTS  TO  3E  3LOTTE  0 

papaheter( naxoat-ico) 

CHAPACTER*20  LEGEND ( 10 ) 

CHAPACTEP*60  XAXIS,YAXIS 
CHARACTE»*(>0  title 

DIMENS:ON  X(MAXDAT,10) ,Y(NAXDAT,10),NSYMB(10),KCHAP 110),L(1C) 
COMMON  /  VALUE2  /X,Y 
LSGEND(l)*  '0 .5  3*iM/S ' 

L  E  GE  N  0  (  2  )  ■  '0.8012M/S' 

LEGEM0<3)»  '  1 • G733M/ S • 

LcGENQ(A).  'L.3464M/S' 

LEGEM0<5)«  '  1 »fc  246MTS ' 

LEGEND(fc)-  'AIR  SPEED' 

L  EGEND ( T) ■  '  ' 

LEGEM  0(3) ■  '  ' 

L  EGENO ( 9 ) ■  '  ' 

L  E  GE  NO ( 10 ) ■ •  ' 

X  A  3f  I  S  -  '  C  F  *'  TO  AL  JET  VELOCITY  /  STAGNATION  POINT  VELOCITY' 


^  I  ■!’ 


I»'F 


mvnifW 


4  7  *Vn 
429n 

4?30 

4mi' 

<•310 
4  3  ?0 
<•330 
<•240 
<•3^0 
4360 
<•300 

41»fl 
<•2  00 
<•<•00 
<•<•10 
4420 
4430 

4440 

4450 

4460 

44"’0 

44^0 

44<?0  301 
4*00 
4510  0 
4  5  20 
4  e  30  C 
4540  C 
4550  C 
4  c  40  C 
4*70  C 

45  00  C 
4  =  30  £ 
4600  C 
4  4  1  C  C 

4  6  70  O 
4630  C 
4640  0 
4650  0 

4660  0 
4470  0 
4400  r 

446 r  o 
4-qo  0 

4  710  0 

4720  C 
4 1 oo  o 
4740  * 

47  =  0  0 
4  76  0  C 
4770  0 

4130 

4700 

4*00 

4*10 

4  3  70 

4  e  30 

4  0  40 
4  3  50 

4*60 

4  3  70 

4  0  00 

4*  Q0 
460rt 
4<?10 

46?0  301 


TAXIS-  »=a3W4B0  /  AST  STAGNATION  POINT' 

WR ITE ( TITL  E  ,301 )  M 
DATA  NSYMB  /  5*-l,  5*0/ 

CATa  KCJAP  /  1, 2, 3, 4, 5*5*1/ 

It  1)  -N.MES 
L ( 2) »NMES 
L  (  3 ) ■ N  ME  S 
1(4) *NM£3 
L  (  5  )  *  N  "  E  S 
L  (  6 )  *  N  P  T  S 
L  £  7  )  ■  N  0  T  S 
1(5) -NPTS 
(.  (3  )  »NPTS 
L ( 10) «NPT$ 

CALI  NAMPlT 

CALL  MRANGX (0.0*1. 2) 

CALL  MPA.NGY (0.0, 1.2) 

CALL  i-D  I  V  (  6.0,6.01 

CALL  iSTASTA(X,L,mAXCaT*TITLE*XAXIS,1»I»1,2«0*6.0) 

CALL  iM  L  I N  E  A  (X, L,Y,maxOAT»I, TAXIS, LEGEND,1»NSYM9»KCHAR > 

CALL  ENDPLT 

RETURN 

FnPHAT(lX,  'SLOT  OF  THE  MONO  I *ENS I3NAL I  ZED  DATA  SET  • »  1 2  ) 
END 

SUBROUTINE  FCTDSTt  N*£ S » N, I TY R  ,  I  M  ) 

CONTROL  THE  SLOW  OF  THE  SUBROUTINES  TO  FIND  THE  CONSTANTS 
CF  A  FUNCTION  d T  A  LEAST  SQUARE  METHOD 


VAQIA3LES 

********* 


NMES — NUMBER  OF  MEASUREMENT  or>lNTS  In  common  «VALUE2» 

N  --NUMBER  CF  ACTUAL  EXPERIMENT 

C  0 1 '  m  C  N 

****** 

V  ALUE  2  —  X(M*XDAT,10)  :  X-VALUES  Cc  EXPERIMENTAL  DATA  AND 

THE  CURVE  FITTING 

Y ( MAXDAT, 10)  s  Y-VALUES  OF  THE  ABOVE 
SUBROUTINES  CALLEO 


FCTFIT — DETERMINE  THE  CONSTANTS 

PCTPOT — ooiNT  THE  FUNCTION  ANH  THE  CONSTANTS 

F  C  T3  L  T— F I  m  0  THE  X  AND  Y-VALUES  OF  THE  CURVE  FITTING 


PARAMETER (MAXDAT*100»MAXC0N. 10) 

DIMENSION  X(MAXDAT,10),Y(MAX0AT,10),A(“AXCCN) 

common  /  VALUE2  /x,r 

NPTS-5C 

CALL  FCTCIT (X(1,N) ,  V ( 1,N) ,MAXOAT,NMES,  A , E R R , I E R R , I T ) 
IF(IEPR.LT.O)  then 

VR I TE ( 6, 30 1 )  'NO  LEAST  SQUARE  FITTING  POSSIBLE  ' 
«RITE(6,Q02)  '  I  E?  R*  ' ,  I  E  R  R 

R  E  TUP  N 


E  6  0 1  c 

CALL  SCT0« T ( A, ERR, IT ) 

CALL  =CT3LT(X(l,‘i),Y|l,N),A,N3TS,NMES,X(l,N45),Y(l,N45)) 
IF  (  (  ITYP.EQ.4)  .  AND. (N, EC.  I  M  )  )  CALL  D»  A  w  (  n,«E  S  ,NP  T  S,  10,  N  ) 

RETURN  34.87 

F  0  R  m  a  T  (  2  x  ,  4  ) 


m 


fc\ 


■jifww'umr 


w 

n* 

£ 

I 


4  Q  ^0 
4  3  4*  0 
4  0*0 
4 

43?0 

;q^a 

4000 

*  0  o  n 
«  r  ]_  o 

cC  30 
c0  3^ 

c  0  4  0 

*050 
c060 
c  07  0 
*00^ 
^0  °0 
K:oc 
c :  1 7 

51  30 
c  1  30 
8  1  40 

5150 

c  1  60 

c  1  ^r» 

■  i 

*1  30 
e !  ~0 
c  200 
-  21  C 
e??0 

*  2  3C 


1 1  7 


F~9MAT(2X, A, 15) 

=  Mi 


Sues  211  TIME  F.;TFIT(X,Y,>UXDAT#N.'»e?,4fepp,IE0p,IT) 

DETERMINE  Tug  rrsETANTS  OF  Th  =  FUNCTION 
VARIABLES 

XC1AXDAT,*) — X  - VALUES  OF  THE  EXPERIMENTAL  DATA 
Y(MAXDAT,*) — Y-VALUES  IF  ThE  EXPE’!uEMTAL  CATa 
MAYOAT  —  ■'AXIVJM  nl'y9E?  OF  EXPERIMENTAL  DAtA  (ONlY  USED 
=  -;o  OI“E,'SIQH) 

N Y£S  — ACTUAL  NUM  3  E  P  OF  E X® E P  I « E NT  A L  DATA  SETS 
A  (  y  4  x  ) — VECT7®  Containing  THE  CONSTANTS 
PBS  — LEAST  SCIJARF  FRsr?  N39Y 

:=s=  — n'jy se p  Shoeing  new  fctfit  worked 

!E:=>0  !  c C T F I T  GOT  9ESULTS 
I E  R  R <0  1  S  :-E  KINO  CF  ERROR  WITHIN  FCTFIT 

SUBROUTINES  CALLED 

•-♦***»-****«***«* 

F  C  T  — CONTAIN  the  FUNCTION  AMO  ITS  PARTIAL  DERIVATIVES 
ELIM — SDL/E  A  SET  OF  equations 

papayeTEP(mAY»1QC,yaxp1«11) 

DIMENSION  X(YAXCAT#*),Y!YAXDAT>*),A(YAX),F(f«AX),W(YAX), 
:  XSAVE(YAX),FSAVEiYAX),APP(YAX,YAXFl) 

CHARACTER  *  50  STRING 


hr 

c  ?40 

LOGICAL  finish 

is 

c250 

call  fctu, f,x,y,w,:,nc  on  st,  string, err»*axit, delta. 

r. 

e360 

0  X  TCL ,  c  TC  L, 0 ) 

t- 

«?^C 

IF(MAXIT.LT.O)  M A  X I T  »  5  0 

ky 

5  2  80 

IFtOELTA.LT.  0.0)  OELTA-.Ol 

,■ 

c  ?^0 

!c (XTDL.LT  .C.C)  XT  CL • . 0001 

c  3 00 

I c ( F  T3L . L  T . C. 0 )  FTCL ■ . 000  5 

By 

e  3 1 C 

“•  3 l-NCONST  + 1 

c  3  ?0 

DO  500  IT-1,. YAXIT 

c  3  30 

CO  10  I-l.NCCNST 

tv 

53^0 

»SAVE(I)«A(I) 

fry 

c  ?  c0 

10 

CONTINUE 

■ 

c  3  60 

CALL  FCT(A,s,x,Y,W,n«*ES,MC0nST,ST?ING,5R9,?,?,R,P, 

hj 

c  ^  “9r\ 

3  2  ) 

V 

5  1  a  0 

FINISH-. TRUE. 

=  3  Q  ^ 

OO  20  I*1,MP0NST 

c400 

IF(A3S(FC)).GT.FT0U  FINISH-. false. 

& 

5410 

FSa VE ( I ) -F  ( I ) 
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CONSTANTS  ARE  OETERNISE:  SY  a  least  SQUARE  METHOD 


function:  v  a  1> A  1* ( 1-X ) + A2* ( L-X ( **? +A3*  ( l-x  )** 3 

*«***«*« 


initial  values?  AI  •  .ICO 

***••««**«***«  A2  ■  2. 30 

A3  -  1,50 


CONSTANTS*.  Al  -  -.601 

****••  A2  •  .569 

A3  »  -.952 


LEA«-T  SQUARE  ERROR  NOP«:  E  *  .66196E-03 

the  S  0  L 1  ^T I  n  n  was  “  0  U  N  AFTE'  2  ITERATIONS 


=  ^p  THIS  DATA  jFT 


TW£  VALUE'  AS  E  NC'J  ^  I  HE  f*S  I  DN  AL  I  Z  E  D  3Y  T^E  PJLSS 
VELOCITY  OF  PUEL 


ANNUL  I'S  Ais  VELOCITY 


cTOWASD  STAGNAtID,i  POINT 


i  c  t  STAGNATION  POINT 


'?D*jCT  an  T*  i  s  E  :ETE5hI‘;ED  3Y  a  least  CCUAPE  ’■•ETHOO 


:  IJH'*  T  [  *>N  : 


Y  •  1  +  A1  *(  1-X  )  -f  A2*(  1-X  )  **2«-A3*  ( 1  —  X  )  **3 


Initial  VALUES:  41 


CONSTANTS j 


a  1  »  -.420 

A2  -  .172 

A3  ■  -.707 


LEAST  <:  0’  I  a  ®  E  E  S  o  2e  nGSu:  E 


•  1 3377E-02 


T-iE  S  "  L  1.1  T  I  n  N  wAS  FOUND  AFTER  2  ITERATIONS 


34.104 


■\ai?  ce  value:  =•"'<?  EKPs;twc-lTiL  cat  a  set 


A  3  e  A  -)c  TuTfP  n  C  Z  Z  L  c 

area  op  i*^n£s  nozzle 
vcloc  :ty  ~f  air 


i ^ . <3 c 3 e>  c  y**? 

•  3  1 A  7  O'***? 
1.3793  -/SEC 


V c L DC  ITY 

ne  c'lEL 
c  -/sec  i 

•  1  3  e  1 
.  I?** 
.2415 
. 1 1 29 
.  3 7?1 
.  4705 
.  5  5  5  3 
.6333 
.7290 

.  3?40 


HEIGHT  of 
CESTsal  JET 
C  hm  ] 

1 7 .  C  1 6  0 
20. 32CO 
2  6 . o  7C  0 
32. 25eQ 

34.6710 
4  C .  6400 
42.4150 
46.99C0 
50.5000 
53.34C0 


HEIGHT  Oc 
L  c  c  T  VORTEX 
C<M  ] 

.COCO 

.  ocoo 
.oooc 
.coco 
.coco 
.cooo 
.0000 
.  0000 
.0000 
.0000 


HEIGHT  OF 
°IGHT  VCBTEX 
C  “1  1 

.ccoo 

.0000 

.ocoo 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 


the  "emtsaticn  roint  :z  gighe:  9y  (*> 


34.105 


iOC!  £F  3  (J  T  £  3  NOZZLE 
4Bca  OF  IK'N£3  m 3 Z Z L E 

VH^ertY  re  ns 


10.5036  C«»*2 
.3157  CH**2 
1.3454  *</SEC 


Vcl?C  ITV 
nc  C||£L 

C  *•/ ^  FT  1 

.1151 
.  1373 
.2^15 
.  3729 
.4476 
.  e601 
.  6355 
.7310 

.  0274 


HEIGHT  0 P 
C  Ek|  TP  AL  JET 
C  *<•  ] 

12 . 70CO 

1  9.  Q 1 20 

2  7 . 9  4  CO 
31 .4  360 
34. 4678 
3s.3540 
42. 1640 

46.4^20 
4a.  5  3019 


HEIGHT  re 
L  E  c  T  VOBTEX 


.COCO 
.0000 
.  GOQC 
.  OOCC 
.0000 
.  C000 
.0000 
.0000 
.0000 


The  P  ENT?  AT  ION  PGINT  13  GIGWEO  3Y  {*  ) 


HEIGHT  nc 
BIGHT  VOPTEX 
C  *1  ] 

.  000  0 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 
.  ccoo 


34.108 


'M 


„n^TT-s  rnS  ThIS  cET 


T-,c  ViL'icc  1<:  OIMESSir^ALIZEG  EY  The  ?  J  L  £  S 

VELOCITY  OF  =  UEL 


3F''ET5aTIC?m  VELOCITY 
=  "PWion  STAGNATION  PCI»'T 

aft  stagnation  po:m 


(■"nstaa'T?  AtE  ^ftept[sl3  ? Y  a  LEAST  SCUARE  “EThOO 


c  :  I  kj  r  r  T  ->  V|  ; 


rN  ITIal  /al'jES 


CONSTANTS  : 


Y  »  1  +  A  1  * ( i-Y 1  +  A  2  *  (  1  -  Y  )  »  *  3  +  A  3  *  { 1  —  X  )**3 


a:  -  .ice 

A 2  ■  2.30 

A3  *  i.50 


A  1  «  -  .  Tj,q 

A2  •  .632 

A3  *  -.31> 


L  E  A  r  T  SO  J  A  o  E  EFS-:?  ‘Oovs 


12735t-02 


7uc  scion:*  was  =  ouno  actes  2  iterations 


34. 109 


| 

II 


vVVA-  vWvV’/v'.'v  v'/.v.v.v.v  v -.-.v.  w. -  •  .  \ 


rfj 


t 


-  IJ  k  r  T  r  n  M  f  T5  THIS  oaTa  S  -  T 


Tu?  VALUES  A^E  n:n0I'1F‘iSI2NAL  IZEC  ay  fr£  s-jLES 
VELOCITY  Cp  =UEL 


Amnijl"S  A  I  s  VELOCITY 
C^R^A9D  STAGNATION  POINT 
i;I  ST  AG*' AT  I  J,N  POINT 


CONSTANTS  APE  DETERMINES  EY  A  LEAST  SCUAPE  “ETmpo 


P  i.ing  T  1 1_>  N  : 

*••*♦*** 


r  *  l* a  1 *( 1- y ) + a2* ( l-x ) **2 *A3* ( l-x ) **3 


tNITIal  VALUES:  A1  *  .100 

**************  A?  •  2.30 

A3  ■  1.50 


C"N<TJMT?| 


41  =  .567 
A2  -  -1.7C 
A3  •  .763 


LEAST  ? o u A p E  ERROR  mOP«: 


. 34427E-C 2 


T^E  SOLUTION  l_S  FOUND  AFTER  2  ITERATIONS 


34.110 


^ '  *  i^«  ■*.  v* .  ■*.  ■' .  • ,  ■<*.  •*.-*.  ■*.  **,  ■*.  ■*,  -  .  •' 


FUNCTION  F  n  8  T^IS  DATA  SET 


T-*E  VALUES  #.»£  *n»|f>  [  h  e  n  r  :  oh  A  L  I  Z  ?  D  3Y  THE  RULES 
VeLnC  TTY  OF  FUEL 

Y  a  - 

3  "  c  T  3  i  T I  "  n  VELOCITY 

FORWARD  STAGNATION  °CINT 

Y  *  - 

A c  T  STAGNATION  PCI'-T 

C  S*1  S  T  ANTS  A?E  DETERMINED  3Y  a  LEAST  SQUARE  METHOD 


c  1 1  h  ^  T  I  n  *i  •  Y  ■  1*  Al*(  1  -  X  )  *A2*{  1-X  )  **2  +  A3*  ( 1-X  )  **3 

******** 


T  N  T  T I  A  L  VALUES:  A1  «  ,  ID  D 

**************  x2  *  2#30 

A3  *  1.5C 


CONSTANT?:  41  «  -.651 

******  42  *  .306 

A3  -  -.563 


LEAST  SC'Jaoc  cs;o5  ,'4o=v.  E  *  .*4312E-03 

T-E  !°L"T::*,  a  S  ROUND  AFTER  2  ITERATIONS 


34. 112 


<- 1  ■  m  r  t  I "  M  ='’?  T  m  :  s  DATA  SET 


TMC  VALUE'  i «?  e  klG':OIMENSICNALi:,ED  3Y  THE  S'JLES 
VELOCITY  OP  F'JEL 

t  a - 

AM^'JU'S  AIR  VELOCITY 

FPPVARD  S  T  AGN  A  T  I  ON  POINT 

y  .  - 

AFT  STAGNATION  point 

CONSTANT'  APE  n'ETe:?u:NED  0Y  A  LEAST  S  2  U  A  P  E  METHOD 


F N  C  T  I n  S : 


Y  ■  1+41M 1-X ) + A2*( 1-X ) **2 *A i* {1-X  }**3 


:ntt:al  values 


A 1  ■ 
A  2  * 
A3  « 


.100 
2.30 
1 .50 


CnN$Ti,>(T9  : 

****** 


A  1  »  .59? 
A2  *  -1.71 
A3  -  .265 


LEAST  SQU A o  E  EPpC=  N 0 P M : 


, 19057E-02 


th E  SOLUTION  ua,  FOUND  AFTER  2  ITERATIONS 


34.113 


■»  *. 


SEE 


VELOCITY  /  ANNULUS 


T  4  *>  L  F  pc  VAL'JES  FC«  EXPE^  I4£NTAl  0  A  T  A  SET  1 


isc  j  np  1VTS°  “J  C  Z  Z  L  E 
•  sej  rC  i»jv  =  o  ‘.CZZLS 
VELOCITY  M3 


1C. 6036  0  *•*? 
.701 2  C  M  *  *  2 
.3012  -/SEC 


VCLC?C  I  T7 

HEIGHT  IF 

HEIGHT  IF 

HE  IGHT 

"f  CUEL 

cental  JET 

LEFT  V09TEX 

FIGHT  V 

C  M  /  S  EC  1 

C  M4  ] 

I  -4  ] 

L  -4  ] 

.  7405 

5. 5113 

.00  00 

.0000 

.10  6! 

14. 7055 

.0000 

.CCQO 

.  1636 

22.0616 

.  0000 

.  0000 

.  ,3  62 

34.3483 

.occo 

.0000 

.  3044 

43. 1  SCO 

.0000 

.0000 

.  3=  76 

45. 72C0 

.  coco 

.0000 

.<*331 

43 . 1  4<?o 

.0000 

.0000 

.4700 

52.5780 

.coco 

.0000 

.  ^264 

53.42C0 

.0000 

.  0000 

T'-IC  SC>i|5ATj- 


(♦  ) 


!INT  IS  5 1  SHE  0  ?Y  (*) 


; 

> 


c  '.INC  T  l  [?«'  =  n,S 


TH 1 3  0  A  T  A  SET 


T^F  VALUES  APE  NDND  IMENS  ICNAL  IZED  aY  7nE  ®'JLES 

VELOCITY  SF  FUEL 

*  - - - - 

PEMFT5ATI’>  velocity 

CHO'JAPQ  ST  AGNATION  PCINT 


AFT  STAGNATION  "'GI^T 

CONSTANTS  APE  :ete5mineo  BY  a  least  souaje  method 


FLKJ'*TTqN:  Y  »  1*A1*<  1-X  )  *A2*  (  1-X  )  **  2«-A  3*  (  1-X  )  **3 


initial  values:  ai  •  .100 

*«**««****«**,  a 2  *  2.30 


A3 

X 

1.50 

C?N*TANT$  • 

Al 

■ 

-.700 

^****« 

A2 

a 

.542 

A3 

X 

-.P  27 

LEAST  $  CU  a  o  £  e«pQp  NG3-:  E  -  .43063E-02 

T-IE  SOLUTION  WAS  FOUND  AFTE®  2  ITERATIONS 


34.117 


eiiMriins  CID»  this  0  at  a  SET 


the  VAL','cS  ARE  NCNDImENSIl!NAL  IZEQ  3  Y  THE  R'JLES 

VELOCITY  cf  FUEL 

X  «  - 

ANMIUS  AIR  VELOCITY 

RO°WAPO  stagnation  point 

y  .  - 

APT  STAGNATION  POINT 

CONSTANTS  are  DETERMINED  3 y  A  least  scuare  -ethod 


FL)MCT!ONI  Y  «  l*Ai*(  1-X  )  *  A2*  (  1-X  )  **2*A3*  ( 1-X  )  **3 


MITTAL  VALUES: 

A I  « 

.  100 

************ 

«* 

A  2  * 

2.30 

A3  * 

1  .so 

CONSTANTS  1 

A 1  * 

.2Aa 

****** 

A2  - 

~  .  9  A  G 

A3  - 

-.341 

LEAST  ?  C'J  A  R  £ 

ERR 

OR  NORN 

:  E  •  .49449E-02 

yHE  SOLUTION 

*  A  S 

POUND 

AFTER  2  ITERATIONS 

HEIGHT 
CENTO AL 
C  MM] 

a.^GCO 

17.01E0 


**2 

**2 

SEC 

HEIGHT  OF 

HEIGHT  of 

LEFT  VORTEX 

RIGHT  VOP 

C  M  H  ] 

C  HM  ] 

.0000 

.0000 

.0000 

.COOO 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.coco 

.0000 

c,JNCT:-!N  c0R  Tujj  OaTA  set 


tjc  vaL"EF  ARE  NGN0ImEnSICNALIZE9  3 Y  THE  P'JLES 
V  E  L  0  C ITY  IF  cUcL 


acsctoation  VELOCITY 


F'-PWARO  STAGNATION  °CTNT 

V  ■ _ _ _ _ _ _ _ 

A  c  T  STAGNATION  POINT 

CONSTANTS  APE  CETfs-trSEO  6 Y  A  LEAST  SQUARE  NETHQO 


CJNC T  TPM » 

******** 


INITIAL  VALUES:  Al 


CONSTANTS: 


l+a;*(i-x)*a2*(1-X)**?*a?*(I-xj**3 


.  100 
2.30 
1.50 


Al  *  -.458 

A  2  -  -.293 

A3  •  -.238 


Lc  ACT  CQ'JAS£  £RRCP  N0Out  E  * 


.2 72C4E-02 


tmc  POLiimN  AS  POUND  AFTER  2  ITERATIONS 


34.120 


•vv. 


r  i  °  L  F  I8  ''ALLIES  ftp  E  x  9E  8  I^E'iTai  OaTA  SET  3 


iocj  n p  ^ | * T f P  NO'ILE 
1 9  E  4  n  8  !k'klEF  N  r  Z  Z  L  E 
VELOCITY  "c  a  1 9 


1C.6G36  CK**2 
.7012  C^*«2 
1.34t<.  M/SEC 


vcirc  ity 

HEIGHT  CF 

HEIGHT  OF 

HEIGHT  OF 

n8  =UFL 

CENTSAl  JET 

LEFT  VORTEX 

RIGHT  VORTEX 

C  -/SEC  1 

[  M-.  ] 

C  Y*,  ] 

C  KM  ] 

,0  467 

7. E  602 

.0000 

.0000 

.1**9 

14.0462 

.COCO 

.0000 

.  1  ?  1 0 

22. 56C0 

.  0000 

.0000 

.  ’306 

27.0110 

.OOCO 

.0000 

.  322* 

35.0013 

.0000 

.0000 

.  3004 

33.3112 

.0000 

.0000 

.4330 

4  C , 1320 

.0000 

.  0000 

.5173 

43. 1  SCO 

.  0000 

.0000 

.  =620 

47 . 7  ?  20 

.0000 

.0000 

THE  PfwTS  4TI1‘I  POINT  IS  SIGHEC  SY  (*) 


p,!NCT!1N  TmIS  "'at  4  SET 


TUE  V4LCES  APS  'OOI'iENSICNALlZEO  3 Y  ThE  PJLES 

VELOCITY  “F  FUEL 

x  •  - 

P F ‘1 E  T  =>  ATICN  VELOCITY 

P  ?  p  w  A  9  0  STAGNATION  PCINT 

y  »  —————— - — — — - — — 

i r  T  STAGNATI  IN  ?CINT 

C^pTa'TS  A  c  E  EEtE°'YIMEO  ?Y  4  LEAST  SCUA^E  Y£THOO 


cii^cT^nsij  Y  ,  l+Ai*<!-X)wA2*(l-X)**2*A3*(i-X)**3 


ISITAL  ValjES: 

«  *  3«* 


A  l  - 
A  2  = 
43 


.  100 
2.30 
1.5C 


Constants  : 

»***«* 


41 

A2 

A3 


-.683 

.303 

-.618 


LEAST  S0UA9E  E ° c OP  E  -  .A5395E-02 

TJE  S  p  L  ‘J  T  !  "  , .  '-AS  F'MJN"'  A  F  7E  s  2  ITERATIONS 


34.124 


-r.  h"_  w_  y\ 


T  i  P  L  E 

“  p  '/AL'.'Ej 

c  T  p  E  X  P  F  Q 

MEM 

**  *  *  * 

AL  DATA  SET  4 

APE  A 

pp  2HT c 5 

z:le  :o 

.6036 

C  ***2 

A9  c  i 

~e  »*n 

ZZL  E 

.7012 

C  .'■***  2 

V  c  L  r 

I  TY  n=  A  I  P 

1 

.6246 

."/SEC 

VcLr'C!Tv 

HEIGHT  OF 

HEIGHT  OF 

HEIGHT  OF 

ic  c  i  •  p  i_ 

CENTRAL  JET 

L£=T  VORT=X 

SIGHT  VORTEX 

C  M / S eC  1 

C  ] 

C  ""  ] 

C  "M  1 

.  ;b-3 

11.1506 

.  o  0  0  c 

.0000 

.1170 

1 4 . 0  a  o2 

.0000 

.0000 

.2110 

13.2113 

.0000 

.0000 

.269* 

23. <5  5  22 

.00  00 

.0000 

.  32<33 

2  <5 . 3  1 0  6 

.oocc 

.0000 

.4116 

34. d7^2 

.0000 

.0000 

.4^05 

37.5412 

.0000 

.0000 

.  5277 

33.3700 

.  0000 

.0000 

.  620  q 

4**.  3564 

.  00  00 

.0000 

Th£  otMTSiTHN  POINT  13  SIGHED  BY  (*) 


,1 

.  •  O 

o 

o 

o 

o 

o 

1 

O 

o 

o 

o 

o 

o 

1 

CN 

o 

03 

U0 

CM 

) 

,  — 

— 

.5  O 

00  r~ 


°  f— 
§  00 


is  >— 

-*g  z 

8  '  ^ 

o  CJ 


INiOd  NOiiVNOVIS  UV  /  QdVMdOJ 


3A.1J9 


S°Le  VALUES  FC5  E  X  5  E  5  I'lfcMAL  "ATi  SET  1 


i3C4  PC  nuTE*  k.'IZLE 

A  9  p  i  "*  F  i'»'PS  VCFZLE 

velocity  -=  u5 


1C  •  sco  6  c M*  *2 
1  .266  0  C  .'*  •  *  2 
.2012  “/SEC 


V  c  L  OC I T Y 

HEIGHT 

OF  OJEL 

CcnTC iL 

[  “/SEC  1 

[  HM  ] 

.0’J0 

5.3086 

.0485 

7. 1623 

.0710 

P. 7700 

.124? 

13.-J7C0 

.1*54 

10.1770 

.1843 

23.6082 

.  2350 

30.  U19 

.2803 

35.314Q 

.3^03 

50.2031 

HEIGHT  Qf 

HEIGHT 

LEFT  VOPTEX 

SIGHT 

[  4“  ] 

C  “4 

.0000 

.0000 

.0000 

.0000 

.0000 

.0000 

.  0000 

.  ccoo 

.0000 

.0000 

.  0000 

.0000 

.00  00 

.0000 

.0000 

.  0000 

.0000 

.0000 

OF 

V3PTE  X 
] 


THE  BEMFT5ATI3M  PJINT  IS  SIGrIEO  3Y  {*) 


r'.' n c t y r; m  enc  This  OaTA  SET 


*«««*«» 


TH?  values  APE  ■•SUOI^ENSrCfiALl’EO  3Y  The  pules 

VELOCITY  OE  puEL 

Y  •  - 

AN‘"'U'S  air  velocity 

PnouAC?  STAGNATION  POINT 

V  - - - - 

ACT  STAGNATION  ’’GI'T 

CH\cta*'TS  APE  OlTE^'MEO  ?  Y  A  LEAST  "CLARE  YETHGO 

piik.rTj-i^t  v  >  1*  A  I*  (  i-x  )  +  A2*  <  1-X  )  **2  »A3*  (  1-X  )  **3 

*****»«« 


Initial  VALUES-- 

A 1  ■ 

.  100 

A  2  * 

:.30 

A3  3 

1.5C 

A 1  • 

1.54 

♦**«** 

A2  . 

A3  * 

-5.02 
2. 5*2 

L  =  AST  S  TJ  A  o  E  E 5  P  HP  NTPY:  £  •  .77311E-C3 

Tuc  $ ”l"T ! hm  WAS  FCUNO  A  c  7E  P  2  ITERATIONS 


34.132 


■'esr.. 


ISLE  ”F  VALUES  FOR  E  X 3  E  R  I  “ENT  AL  DATA  SET  2 


SEA  OF  OUTER  NOZZLE  10.6036  C“**2 
REA  °F  INNER  NOZZLE  1.2*63  CM**2 
ELOOITY  0=  AIK  1.0703  “/SEC 


V-LOC  TTY 

HEIGHT  ne 

HEIGHT  QF 

HEIGHT  OF 

3=  CUEL 

central  jet 

LEFT  VD»TEX 

RIGHT  VORTEX 

C  “/SEC  1 

I  “M  ] 

[  ] 

I  “M  1 

.04?6 

6.6020 

.  0000 

.  0000 

.0456 

7. o  f  02 

•  CO00 

•  CCOO 

.  0604 

3.1290 

.0000 

.0000 

.0036 

1 0. 4206 

.0000 

.0000 

.1430 

It. 5962 

.0000 

.0000 

.  1  «  40 

21 .5000 

.  0000 

.0000 

.2414 

27.0400 

.0000 

.0000 

•  2  6  A  4 

33.32C0 

.0000 

.0000 

.  3203 

3O.H60 

.0000 

.0000 

he  fE‘'ET5ATIjN  PQI  nT  is  SIGHEO  9Y  (*) 


Tuc  v  A  L  ' 1 E  S  A?  E  N Cf O  I  E M S  I  CN  A  L  I  Z E  D  3Y  TH£  PULES 


VELOCITY  OF  FUEL 

<  - - - - 

ANNULUS  4  IF  VELOCITY 

F  n  R  w  A  9  0  STAGNATION  3  C I  NT 


A  F  T  STAGNATION  POINT 

CONSTANT^  ape  OETEp^INEO  A  LEAST  SO U 4 P E  "ETH0D 


function:  y  ■  1  +  A1*( 1-X  )  +  A2«{ 1-x ) **l +  A3* ( 1  —  X ) **3 


INITIAL  VALUES:  A1  «  .100 

*.***,*•***•«.  a2  -  2.30 

A3  «  1.50 


CONSTANTS!  A 1  *  2.00 

******  A2  *  -fc.04 

A3  -  3.11 


LEA'T  SOIJAQE  ERROR  NORM!  E  *  .64470E-03 

Tug  fOLJTION  WAS  FOUND  AFTER  2  ITERATIONS 


34.134 


^  "  i*.-  «v  - 


OF  V  A  L  j  E  S  FOR  E  X°E  ?  r“E,,T.*.L  2  AT  A  SET  3 


ARE*.  0U”ER  ;»0ZZL5  1  w  .  fc  C  3  ^  C“**2 
A»fi  n:  r^*i£s  ‘  3ZZLE  1  .266  0  C“**3 

VcL-r:ry  i:,  2.346*  -/S£C 


7clOC I  TV 
:3C  =I!EL 

r  “/sec  : 

.  3577 

.004? 

.  1^4g 
.145* 
.170? 
.2161 
.  7627 
.  2700 
.  3017 
.  3625 


HEIGHT  ; 
CENT3 AL 
C  7“  ] 


HEIGHT  -F 
LEFT  VORTEX 
[  “  1  ] 


R. 1654 

.0000 

10.0712 

.0300 

13.3446 

.0  300 

16.3576 

.0000 

1<3. 7612 

.0000 

22.0380 

.0000 

23.0760 

.0300 

26. 1620 

.0000 

23. 6672 

.0000 

33.731? 

.0000 

HEIGHT  OF 
RIGHT  VORTEX 
C  HH  ] 

.0000 
.cooo 
.000  0 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 


RESETS 4TIGN  point  IS  SIGHEO  3Y  {*) 


m 

■M 


34.135 


F* 


fwis  DlH  SET 


T^F  VALUE*  A?e  N'?NOIMENS  I  CNAL  1 1 E  D  3Y  THE  3ULES 

VELOCITY  OF  F'JSL 

x  - - - - - - 

4N  miji  U  S  4IP  VELOCITY 

FORva so  STAGNATION  POINT 

v  •  - — — _ _ _ _ _ _ _ _ 

A  - T  STAGNATION  001  NT 

”nNcTAMTr  APE  OETE»  NINEO  EY  A  LEAST  SQUARE  mETHCO 
O'lNCTIONt  Y  *  1*41*  { 1- X  )  ♦  A2*  (  1-X  )  **  2  *A  3*  <  l-<  )  **  3 


TNI’IAL  VALUES: 

A 1  - 

.  100 

************** 

A  2  * 

2 .30 

A3  » 

1.50 

CONSTANTS  : 

A 1  ■ 

1.73 

****** 

A2  ■ 

-4.40 

A3  * 

1.71 

L:A*T  PCI'APE 

E F  3 CR  N0oM 

*  E  «  .1415 fc  E-02 

Tut  S  0  L  'J  T  I  n  M 

■  AS  FOUND 

AFTER  2  ITERATIONS 

34.136 


ENTRAL  JET  VELOCITY  /  ANNULUS  AIR  VELOCITY 


f  / 


PLOT  Or  THE  NONDIMENSIONALIZED  DATA  SET 


H0-A18G  494 UNITED  STATES  AIR  FORCE  RESEARCH  INITIATION  PROGRAM  89/11 

1984  RESEARCH  REPORTS  <U>  SOUTHEASTERN  CENTER  FOR 
ELECTRICAL  ENGINEERING  EDUCATION  INC  S  HD  PEELE 
UNCLASSIFIED  NAV  88  AFOSfi-TR-87-1721  F49S2B-82-C-8825  F/G  15/1  NL 


1*4 

m 

T<S» 


CO 

cn 

CO 

CO 

\ 

\ 

\ 

\ 

2 

2 

2 

2 

CM 

rO 

CO 

o> 

CO 

o 

M- 

CM 

CO 

o 

q 

co 

o' 

*- 

r— 

< 

+ 

X 

0 

M 

m 


O 

o 

o 

o 

o 

o 

o 

o 

00 

CO 

•V 

CN 

I'M 

»*r" 

*3 

»v 

•«,>z 


lNIOd  NOI1VN3V1S  JJV  /  QdVMdOJ 


34.157 


CENTRAL  JET  VELOCITY  /  ANNULUS  AIR  VELOCITY 


T  A  0 1  p  -P  w  *■  L:  •€  r  PI-  TiL  V'4Ta  T  I 


"  *TT[P  *  ; 
»cca  ^ c  jmv:j  *-1 
V  c  L  •“*  f  I T  Y  n  c  A  I  ■? 


•  7C1‘>  C-*  ^  ’  3 
.5?  M  / 'S  EC 


vei_nr  tty 

HEIGHT  2C 

HEIGHT  1= 

height 

-tc  C  M  (=  t_ 

C=*'T5.*.L  JET 

LFFT  vr3TE> 

9  IGhT 

C  "* / S  EC  1 

[  ■•'*  ] 

C  <v  ] 

[  HM 

r  ,  «  e 

• 

:.:??2 

3.71=2 

5.4610 

,  O  AO  A 

*. .  7  ?  <•  a 

v  •  4  *  EC 

*.527P 

.  nr  ? 

7.3  ‘■tr*. 

v  .2672 

5.8676 

ic.iE-ro 

•3. 2  3  VO 

5.6096 

.  l°aa 

12.  i79i 

5 .2=32 

6 , 2°32 

1  o .  0  :  ~  & 

v  .  ••  2  60 

5.915  ? 

.  2659 

1  » .  7  ?  ^ 

6.0039 

6.7619 

,?7P9 

13.''BC3 

V  .  9  7  4  4 

6.6549 

Tup  oc»;TC  i  T; 

3 ~ i v t  :r  'igm::  ^y  t*> 

34,158 


«A 


[ii;: 


!»;• 

l*!«, 


k-7 

$ 

P 

m 


m 

1 

& 

l»W 


I 

$S 


-'*•><■  V'SSviV 


*$$£ 


*1 

V 


piivcr^*1  cn?  tm.;  ('ill  -  t 


Xhc  i^c  *  ’Vi  ;  '  E  "  j  I  C‘*  -  L  I  Z «  J  "  y  T  4  f  c  1  L  £  ^ 

WCl.nr  ITY  ~c  P’JEl 


avMUL'lS  41  =  (/  E  L3C  I T  Y 


c-'P'jioa  STiC‘‘ATT"‘;  PCI  NT 


.apt  JTAGNATIC'i  5"!'T 


f-'MCTAMfj  j3c  t=t£c  vcr.n  cy  i  LEa£~  '"la3E  mE  Th  3C 


PM'irjrnv  • 


Y  *  i  +  a i * ( i-y  )+ A2* (  i-Y ) **3+A 3* ( 1-* ) **3 


IVTIAL  VALUE!  t  U 
A3 


m 

m 

Jy 

M 


rnkjfTjMTji 


ai  •  z.c: 
JZ  *  -5.3? 
A3  *  ?.30 


L?A,«t  cpi|i5£  rff?-o  'i-'tf  -  s  r. 


.16CC1S-02 


f4C  p  n  I  i  it  I n  *.  '.lij  a  p  t  c  o  I  :T  =  3ATIC‘i! 


?S 

B 

i 


W 


| 

1 


34.160 


▼4P»  F  V  *.  U  E  ’i 


e  <  j:~  r'E  »t*l  uATt  :et  * 

«  *  *  *  *  a  *  *»*!^*<'***.*'**$**»*ir** 


i.Ci 

OF  T'Tss  VT’ILE 

CM**2 

A  9  f  4 

I  C  =  r.-'Z?i~ 

.v:  ? 

r  ^  *  2 

V  c  !  "C 

T  r  y  \  '  r 

.  '  :  2 

•'  /  J  C  f 

w e L nr TJY 

HEIGHT  pF 

HEIGHT  'OF 

HEIGHT  of 

n  s  r  1 1  p  i_ 

"  E'<Tr  AL  JFT 

LEFT  V0=>  TE  5« 

FIGHT  VQOTEX 

C  «/S=C  1 

[  ] 

[  •v  ] 

[  HH  ] 

.^14 

i.~ 224 

4,97=4 

6 . 9C96 

,  r  =  a  n 

4,2122 

c.?MC 

c  .AC13 

.  U’o 

4.  1-C6 

5.740* 

f  .  3302 

.1*7* 

1 1 . *  3C  ? 

4.00*0 

7.620C 

.1A?0 

2*co 

5.347* 

7.0612 

.  '’"'■’I 

71 .7170 

R ,74p4 

4 ,2*d* 

,  2  7  *,  ? 

25.3102 

5 . 0  h  OC 

6.3681 

.31=a 

?  4 .  3  7  3  2 

5  .  Cq  Of, 

5.232* 

*4  r  t*  * 

■  L 


TMC  3:vT9Att> 


T  f: 


TI3HED  0Y  <*) 


M 


m 

m 

i 


T  \  D  I  C 


,!f"  e-**  :'pco 


m 

#1 

m 

m 

m 

1 


+  b-  n 
5  T  *  ' 

E LPC  ! 


A 

“  ;••  * 

CM* 

3 

3HT  0  = 

height  OP 

T  VO®  TEX 

SIGHT  VnP 

i  «t  ] 

C  hm  ] 

3  71 

1.5952 

-3  43 

p.372<> 

532 

10.2670 

’7g 

7.5692 

324 

6.9«50 

<>74 

6.3500 

* 

4 

4 


ptJMT  T  Tr"l  c-<c  TJX,  rJiT4  ;rT 

•»*»*»«-**^«****«r««»;»*«-»*  ^ 


T-*6  value”  tue  \-i  ■■orv' s  ::;aL;ro  “>y  tuc  p.»Lgs 

VELTIIY  ,'F  fjfl 


p  c  v  c  t  o  4  t  x  "2  r,  V  c  L  0!"  ’  T  Y 


C"P'J43n  S  v  A3N4  r  i  X”*i  ’CPY 

y  ■  - 

A  =  T  c  T  A  Rf:  4T  I  1;,  ?  ,j :  ‘  J 

C',J'T,-,,T'5  ACL  n  TT=  ?  il":i  ay  a  L5AGT  SClAsr  '4ETh1P 


=  jwr  t  I  n'i : 


Y  •  1*A 1*( :-X ) ♦ A2*( i-X ) **2*A3* (1-X ) 0*3 


r m  r t  *  A!  >./  *  l  ■  i e r ;  a  i 
•  42 

4  3 


M  3  -.1*.- 

4  3*  -1.6° 

A3  «  .fill 


R'\)AF  =  NG'5'': 


. 71 5  5 IE-0 3 


TMC  C'-Luri-'N  >  A  L  F-J“1-  AFT=5  2  ITE  =  ATi;r.I 


$ 

■«v 

«v 


34.165 


yc«»fr 

*,»  ',1  '  .1  ' 


fTW.W 


o  *  <* 


Cn^r  ;  -* 


rjiTi 


**•*.■ *  *  e  *  -  *  * 


Tuc  WA|_,.  =  c  isg  *  '•'M,,:'.;::-.iLl’E?  3Y  TUE  3'JLES 

V  =  L",CItv  r  "  "  •_'  r  i_ 

y  ■  - 

4‘JMUL  "S  4  !3  7 1  L  ~  0  I  T  Y 

r ■> cw i 3 d  * r i~"  pri‘T 

v  X _ _ _ _ 

4  =  T  $  T  A  r,  i  T  I  1 '«  ■>  ^  I  ?  T 


0  n  m  <•  T  A  v  T  “  i  5  c  ri ; 

.  T  c  ?  M  f  • . 

=  ■>  :-y  a 

Lc:^  “ E T -a 2 ? 

C T 1  r  r  *  ni;  . 

Y  -  1 

+  A  '.  *  (  i  -  y 

>♦ 42*  t  ?-*)**? ♦A3*  t l-x )* *3 

r  m  I T  T  A  L  V  *  L ' '  E  "  : 

A 1  - 

A  >  a 

A?  » 

.  ir 
:  .311 

1 .50 

.4  1  « 

A  2  * 

A  ?  s 

-  .  ’  4  • 

3.  <*l 

-‘.’6 

L=ACT  C'i  A  ■?  >f 

-o  -,-r 

< :  c  > 

,2192SE-"2 

rue  S r»L 'J T T n r  'j.'Z 

c-,J>r. 

aft;c 

2  r^E’ATIJNS 

< 


I 

r 

A 


34.166 


'  • 

1*1 

■*a 

i 


& 

J 


r  A  q  t  r  VML"Er  -  ~  v  c  *  yr?  r?L^  r*L  lM  T  A  tfT  4 


A  ^  ^  ^  P  ‘"7  * !  T  f  ^  K  C* 

ACPa  rP  I'  *!(_;  v- 
/ 1  L  °C  T  T v  n~  \  [ 3 


•  6  r'  3  6  r  M  *  *  2 

•  **  C  i  2  f  *•*  =*  *  ? 


.34*4.  -/SEC 


nr  TTY 

M  C  I  J  U  T  ",  C 

WEIGHT  CP 

u  E  I  C-  H  T 

PI'EL 

C  =‘;T° AL  JET 

LEFT  vpbtex 

B  IPHT 

'/SEE  1 

C  *•'*  1 

C  ,M  3 

[  m 

"4M 

3  ,  <  3  *.  3 

7.1374 

1 0  .  2 1 0  => 

:■  -  <.o 

5. c -?0 

7  .  4  o  7*- 

1 .06*2 

1  3  70 

p.C'MO 

o.eocc 

13.131? 

17?o 

1 1 .  4  s 4.0 

7.a’49 

7 .6200 

2  3  00 

1  6  .  7  t  ^  n 

7. 6 2  CO 

7.0756 

3C  ^ 

l^.  3C<0 

7,6703 

7.Q24? 

***•  ?-3 

3  3  f  3  ?  f  ,  ) 

•3.7  =  64 

7.6200 

TOC  0:>|T34TT'‘.  =:i‘iT  is  *“  I G  ■ J  =  D  5  Y  (*) 


34.167 


!r,»ri,*7*,‘.r| 


e;n> 


THC  Vi  l A  3  E  ‘  •  I  '-’E.'S  I  E;'  *«L  IZE  n  3  Y  Tmc  c  j  |_  c  <; 

VE!.  -city  ~=  =  n  =  i_ 


sc,M;TjiTjn.,  wEu"3E  I  T  Y 


e-p-jiso  star'. \rr"4  °rr!.T 


■* =  t  stag *.at: nKi  jivt 


A3E  n  E  -  “  [  *•  =  T  BY  A  L  -  A  r  T  ECjA3:  WE  T-(  20 


f  |  |kl  r  T  *  ny  . 


Y  =  i*  Ai*  (  i-Y  )  +  A?*  (  1-K  )  **?+.A  j*  c-x  )  **3 


r  ^  T  T  T  i  L  V  i  U.‘  5  c  *.  Ai 

****  ■»  *••**«■**  *  *  at 


r  IN  STARTS  t 

■»***<«»« 


U  -  .  2  3  A 

a  2 »  - : .  n 

13  *  1.70 


l_rArT  ?=  jjs  ;j  v77‘i:  g 


. 25:52E-02 


Tuic  s  ” !. 1 ' T  I r  ‘  ■  wAE  -TijnC  aETE3  2  ITcsaTI.'n*? 


34.168 


Hff3Si5BffSBS&MB3BKJBlPBB>i!S!V3Sv^?gjcSMvlKtf?iMSy^SPiKvJOgSzjc 


pHKirTp'J  C-*C  “saT^  rT 

**•*****«***«■**.$•#**  1V3V«1 


T.-4  c  w  *  l  i  jp  c  »:c 


wrLnCITv  =  j  i  c-  l 

4  ►  *4  •  i  L  '  •  S  A  I  p  =  L  -  T  T  Y 


risjjJr  CT:^‘  jT""s  p  r  t  >  t 


irT  LTi.:-*  \ r : 


•y  T'-JP  PILES 


rzf  ~,T*;Tr  ip1'  -y  a  i.:;”’  c0^iPf  ME  T-tO;) 


p i  jki  r  T  T  • 

***++**♦ 


*  *  !+a;*<  '-KI  +  JilM  i-x)**?+A3*(l-X)**3 


r  ‘I  I T I  A  L  V  \  L  I  •  C  : :  a  1  ■  .  :  -V 

•  »*»*«**»**,»,  a  “  ,  V 

A3  >  ’.,?(. 


L  c  4  $  T  $  CJ  4^  5  -  J  c  ' a  ■> r  : 


r  -i  c  c  - 1  ■  i  r 1 


'A;  ?TjO  iCTZC 


.  -r  62  3E-03 


:  :te’at::‘'3 


34.172 


u 

II 

If 

IV 


w? 


7mm*: 


NONDIMENSIONALIZED  DATA  SET 


s  s 


TABLE  "c  VALUES  CDP  E  X°E5  1‘IENTAL  OATA  SET  1 


apes  OP  TIITES  *CZZLE  10. “5036  0**2 
APE*  OF  Immep  AOZZLE  1.2669  CM**? 
VELOCITY  n'  A I P  .5341  M/SEC 


VELOCITY 

HEIGHT  OF 

HEIGHT  OP 

HEIGHT  OF 

OP  PUEL 

CENT P  AL  3  ET 

LEPT  VERTEX 

FIGHT  VOPTEX 

C  */SEC  1 

C  M M  ] 

C  M*  ] 

C  MM  ] 

.o:>39 

1.0000 

3.44frQ 

4.6000 

.0376 

2.4104 

4.7408 

5.6007 

.0643 

*.2723 

6.2230 

7. 1309 

.00*4 

0.7023 

7.C730 

7.4346 

.10*6 

7.5433 

3.0662 

10.0863 

.1204 

3.3501 

10.0105 

11.3030 

.1403 

O.&077 

13.6003 

13.6093 

.1405 

12.1103 

16.1200 

16.1290 

.1034 

13.5015 

4.6736 

5.2578 

.2044 

14. 7004 

5.4301 

5.4381 

.2205 

15.2560 

5.1562 

5.7150 

.  2004 

10.4120 

4.4704 

5.1054 

.2041 

21.5000 

4.4704 

5.1054 

.3410 

23.4050 

4.4704 

5.1054 

.3710 

2* • 3  P  40 

5.0900 

5.5143 

THE  PEMTPATI.1S  POINT  IS  SIGHED  9Y  <*) 


34.175 


function  =  dp  this  data  set 


THE  VALUE?  ARE  riONDI^ENSIONALlZED  3T  THE  R'JLES 

VELOCITY  OF  c ’J E L 

X  - - 

,ekJETRATIGN  VELOCITY 

FORWARD  STAGNATION  °CIf'T 

y  • - - - - - - 

AST  STAGNATION  POINT 

CONSTANT*  Ak£  r'ETERNIHED  3Y  A  LEAST  SQUARE  METHOD 


FUNCTIONS  Y  ■  1+Al*(l-X)+A2*(l-X)**?+A3*(l-X)*«3 


INITIAL  VALUES:  A I  »  .100 

*«»««***•*•*«,  a2  „  2>30 

A3  -  1.50 


Constants:  a;  •  -.126 

****••  A2  -  -2.16 

A3  -  1.34 


LEAST  SCJARS  ERROR  nocy«  s  «  .20902E-02 


THE  SOLUTION  WAS  FtijnS  AFTER  2  ITERATIONS 


FUNCTION  cob  THH  DATA  s  £  T 


T4E  V4LUFS  A9  =  N3NDI**ENS!CNALIZE0  3 y  THE  S'JLES 

VE  LnC  Hy  OF  FUEL 

X  - - 

ANNULUS  A  I s  VELOCITY 

=  ->0*490  STAGNATION  POINT 

y  - - — - 

APT  STAGNATION  oQ I  NT 

CONSTANTS  ape  OETEOMINEG  3Y  A  LEAST  SQUARE  neThCO 


FUNCTION! 

y  «  A  1  *  { 1-X ) ♦ A2* { 1-X ) **2 ♦AS* { 1  —  X  )  *  *  3 

initial  values: 

4  1  • 

.  100 

42  « 

2.30 

A3  « 

1.50 

-ONST ANTS  t 

A 1  ■ 

1.1? 

****** 

A  2  « 

-A. 03 

A3  » 

1.39 

LEAST  STUPE  =°P 

OR  MHO-*! 

E  -  . 50355E-02 

THE  SOLUTION  WAS  "OLIND  AFTER  2  ITERATIONS 


TA9LE  ~F  VALUE'  FOR  £  X  3  E  5  IM  E fl  T  AL  C  AT  A  SET 


A 9 E  *  CF  n"TE?  NCZZLE 
A®  E  A  ?F  I M  M  E  5  NOZZLE 
VELnC  ITY  T>c  aiu 


10.6036  C  .9  *  •  2 
1 .266 a  C,9**2 
.9012  9/SEC 


VELOCITY 

HEIGHT  OF 

HEIGHT  QE 

HEIGHT 

OF  eUEl 

CENTRAL  JET 

LEFT  VORTEX 

RIGHT 

C  "/SEC  1 

C  ,4M  3 

I  99  ] 

[  99 

.01  <70 

2.0320 

5.0900 

7.1374 

.0239 

2.1590 

4.8006 

6.2494 

.0410 

2. 2960 

5.4102 

7.8994 

.0579 

3.91C0 

5.6134 

8.1280 

.0901 

5.0500 

8.305? 

9.9822 

.10  9  9 

ft. 4040 

4.7028 

10.1092 

.124? 

7 .  8  40 

11.1760 

11.7348 

.1494 

9.4996 

13.9700 

13.9700 

.1594 

10.4140 

15.2400 

15.2400 

.1794 

11.659ft 

5.3340 

5.3340 

.1999 

13. 4620 

5.3340 

5.3340 

•  22  4ft 

14.4780 

5.3340 

5.3340 

.2706 

17. 2720 

5.3340 

5.3340 

.2015 

1  ■),  79  to 

5. 59?  0 

5.5080 

.  3035 

19.8120 

5.4364 

5.5080 

.  3240 

22.3520 

5.0300 

5.9690 

.  3974 

25.40C0 

5.5380 

6.0190 

THE  9ENT9ATIQM  POINT  IS  SIGHED  9Y  (*) 


34.178 


B 

fe; 

fe 


i*.'! 


=uNCTinN  f n o  this  oata  set 


Tme  valves  are  NOnOI^EnSICNALIZED  by  the  rules 
VELnCITY  GF  FUEL 

v  a  - 

PENETRATION  VELOCITY 

forward  stagnation  point 

V  a  - - .... 

AFT  stagnation  °0 1  NT 

CONCTA^'TS  are  olter^ineo  =y  a  least  square  -ethcd 
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I  .  Inc  roduct ion 

The  numerical  modeling  of  multiphase  flow  m  a  sudden-expansion  ramjet 
combustor  geometry  had  been  studied  by  the  present  author  during  his 
participation  in  the  AFOSR/SCEEE  Summer  Faculty  Research  Program  in  the  summer 
of  1984.  It  was  part  ot  several  research  efforts  undertaken  3t  the  Aero 
Propulsion  Laboratory.  ( Wr ight-Pat terson  AFB;  Dayton,  Ohio)  to  gain  further 
insights  into  the  characteristics  of  multiphase  flow  field  in  a  ramjet  dump 
combustor . 

The  basic  eonf igurat ion  of  the  so-called  sudden  expansion  dump  combustor 
is  shown  in  Figure  10.  In  this  type  of  combustor,  liquid  fuel  is  sprayed 
into  the  ram  air  upstream  of  the  dump  station.  It  may  also  be  injected 
directly  into  the  chamber  via  side-wall  inlets.  Primary  flame  stabilization 
is  provided  by  the  flow  recirculation  regions,  which  may  be  supplemented  with 
mechanical  flame  holding  devices  at  the  air  mlet/combustor  interface  and/or 
the  presence  of  inlet  air  swirL,  obtained  by  the  use  of  tangential  injection 
or  swirl  vanes. 

The  goal  of  the  summer  research  was  to  investigate  via  numerical 
modeling,  the  flow  characteristics  in  a  sudden-expansion  ramjet  combustor. 
The  particular  problem  is  concerned  with  liquid  fuel  spray  in  the  combustor. 
The  objective  was  to  develop  a  computer  code  which  can  be  used  for  the 
systematic  study  ot  the  multiphase  flow  characteristics . 

Liquid  t  ut» l  spray  plays  an  important  role  in  combustion  performance  and 
emission  of  pollutants.  Local  values  ot  air/fuel  ratio  are  governed  by 
trajectories  of  individual  droplets,  rates  of  vaporization  and  mixing  of  fuel 
vapor  with  air.  Atomizers  produce  sprays  with  a  wide  range  of  droplet  sizes, 
velocities  and  initial  directions  of  flight.  The  droplets  interact  with  gas 


streams,  which  can  deflect  the  droplets  from  their  trajectories.  Vapor  is 
released  in  the  wakes  of  the  droplets  and  these  trails  of  vapor  mix  by 
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liistrejflis.  The  rates  of  vaporization  are 


■r  if  arc  i’.i'i  species  concentrations  of  the  environment 


•ts  traverse.  Since  combustion  efficiency  and 
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>t  r :  f.t  :  ns  ire  lirectlv  dependent  upon  air/fuel  ratio 

in  i..  .rate  prelu  tun  of  composition  of  the  fuel  vapor 
f :  pie*  or!  lie  is  important  for  spray  combustion  analysis. 
..tv  r  il.ipti'u  md  modifying  developed  computer  codes  to  the 
:  ■.  -  ii  ■  i  1 1  1  ■  i  n  s  iiad  been  considered.  Several  existing 

u  fluid  flow  modeling  available  at  the  Aero  Propulsion 
••■••n  examined.  They  were  described  briefly  in  [1].  It  had 


.n  1  : :.  1 1  :  t  w  1 


most  efficient  to  develop  a  custom-made  droplet 


!e  m  !  ;:.i  r;  rate  ;t  into  the  existing  STARRC  code  for  the  multiphase 
.  ..it:  n.  Subsequent ly.  t  droplet  spray  model  was  formulated  along 
vr-ri.l  so  lot  in  Si  heme  i  see  (  1  |  )  . 

prevent  research  work  is  a  cont  lnua 1 1 on  of  the  summer  work  conducted 
if,  r  it  the  Aero  Propulsion  Laboratory.  The  goal  is  to  implement  the 
iv  mode  1  i long  with  the  overall  solution  scheme  into  the  ST ARC C  code 


. .  t : '!!.!  te .  v 


;;i  he  used  far  the  systematic  study  of  the  flow 


i ::  tti>*  p  r**s**n  t  study,  a  liquid  spray  mode  L  has  been  inserted  into  the 
riAhri  .  ie ,  i  he  letai  is  of  the  formulation,  overall  solution  scheme  and 

or.  ceii.  r-  ire  ^ ;  vii  ;  ;i  this  report.  .lore  details  on  the  Liquid  spray  model 
f •  ram  1  a t : on  is  given  in  ;1|.  Due  to  some  programming  difficulties  encountered 
.n  running  SFAPRC,  STARPIC  was  used  instead.  Since  ST.ARPIC  considers  only  the 
fluid  dynamics,  only  the  lroplet  momentum  source  terms  are  considered  in  the 
liquid  sprav  model.  However,  provision  has  been  made  in  the  liquid  spray 
■  anputer  code  to  account  tor  the  thermal  energy  and  species  source  terms. 
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The  liquid  phase  is  modelled  as  a  steady  droplet  flow  from  a  set  of 
ports.  The  ports  .nay  be  at  any  location  inside  the  flow  field  as  well  as  at 
the  uilet  perimeter  and  can  have  arbitrary  input  for  mass  flow  rate, 


velocity,  droplet  diameter  and  temperature.  A  listing  of  the  modified 

STARPIC  program  is  given  in  this  report. 

STARPIC  generates  tables  of  property  data  including  velocity,  streim 
function,  turbulence  energy  and  turbulent  dissipation.  These  data  are  given 
for  an  array  of  points  mapped  in  a  grid  over  the  length  ot  the  combustor  along 
a  plane  from  the  centerline  to  the  edge  if  tie  cumOustor.  A  set  of  computer 
programs  ISTRMPLUT,  S THNSuR T  l  have  been  developed  to  plot  the  streamlines. 
Numerical  data  can  be  hard  to  interpret  and  use,  whiie  plots  can  help  make  the 
interpretation  easier.  !he  procedure  used  In  plot  the  streamlines  <.  an  be 
broken  down  into  two  separate  steps.  In  the  first  step,  a  subroutine 

(STRMSORT)  working  in  the  STARPIC  program  generates  plotting  points  and  stores 
these  points  in  a  data  tile.  The  second  step  is  to  plot  the  data  using  a 
postprocessor  program  (STRMPLOT)  running  with  a  Calcomp  pen  plotter.  This 
set  ot  programs  is  1  very  specialized  point  generating  subroutines  that  is 
designed  specifically  for  stream  function  plotting  and  is  unsuitable  for 
plotting  anything  but  stream  function.  In  order  to  plot  other  properties  as 
well  as  stream  function  a  more  universal  point  generating  program  (  PLOTGE.V  I  is 
deve i oped . 

The  plotting  software  developed  ill  the  present  work  can  also  be  used  with 
minor  modifications  to  produce  pen  plots  ot  the  output  'if  other  similar 
programs  as  well.  The  programs  are  written  for  the  user  who  has  a  mild  working 

knowledge  of  Fortran  ~?  or  similar  version.  The  details  of  the  theory  and 

operation  of  these  plotting  softwares  are  included  in  this  report. 
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II.  Fuel  Spray  Model  Formulation  and  Overall  Solution  Scheme 

In  the  present  work,  a  liquid  spray  model  has  been  inserted  into  the 
STARPIC  Code.  The  liquid  phase  is  modelled  as  a  steady  flow  from  a  set  of 
ports.  The  ports  may  be  at  any  location  inside  the  flow  field  and  can  have 
arbitrary  input  mass  flow  rate,  velocity  and  temperature.  The  liquid  flows  in 
the  form  of  a  stream  of  droplets  in  an  annular  section.  The  model  is  founded 
<n  t  e  idea  of  regarding  the  liquid  phase  as  a  source  of  mass,  momentum  and 
energy  to  the  gas  phase  continuum.  The  calculation  scheme  utilizes  the 
cellular  approach  in  which  each  computational  cell  is  regarded  as  a  control 

volume.  Eulerian  conservation  equations  are  applied  to  the  gas  phase  and 

Lagrangmn  equations  of  droplet  motion  and  thermal  energy  are  applied  to  a 
finite  number  of  droplet  size  ranges  representing  the  size  distribution  within 
the  spray.  Recording  the  mass,  momentum  and  energy  of  the  droplets  on  crossing 
ceil  boundaries  provide  the  droplet  source  terms  for  the  aas  flow  equations. 

The  calculation  begins  by  solving  the  gas  flow  field  assuming  no  droplets 
are  present.  Using  this  flow  field,  droplet  trajectories  together  with  the 
size  and  temperature  histories  can  be  calculated  as  a  solution  to  a  system  of 
ordinary  differential  equations  developed  from  the  Lagrangian  formulation.  In 
this  program  the  droplet  trajectory  is  calculated  by  numerical  integration 
using  a  fourth  order  Runge-Kutta  method.  The  droplet  trajectory  is  followed 
t  rom  the  port  inlet  to  the  point  where  it  either  leaves  the  flow  domain  or 

ruts  the  outer  wall.  No  attempt  has  been  made  to  account  for  the  history  of 

the  droplet  after  splashing  off  the  wall.  Also  excluded  are  the  possibility 
-it  the  drop  crossing  the  center  line  or  colliding  with  any  other  droplet  as 
reliable  models  for  these  collisions  have  not  yet  been  developed.  The  drag 
forces  on  the  droplet  are  computed  assuming  a  spherical  drop  shape.  The 
equation  ot  motion  of  a  droplet  is  given  by 
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Where  l  and  V  jre  the  gas  and  droplet  velocities  respectively.  is  the  drag 

coefficient,  R  is  the  droplet  radius,  g  is  the  gravity  vector  and  X  is  the 

droplet  location  vector.  The  gas  phase  velocity  components  used  in  the 
numerical  integration  are  assumed  to  be  constant  in  a  given  time  step.  The 
value  of  the  gas  phase  veLocitv  component  is  chosen  as  the  velocity 
i  irresponding  to  t lie  L  or  V  cell  that  the  droplet  is  m. 

It  should  be  mentioned  that  STARP1C  as  well  as  STARRC  and  TEACH  employ  a 
special  grid  system  known  as  the  staggered  grid  system.  A  schematic  ot  the 
staggered  grid  system  is  given  in  Figure  1  where  the  C,  U  and  V  cells  are 
shown.  The  C  cells  ire  the  control  volume  cells  for  quantities  such  as 

temperature  ind  pressure  which  are  referenced  at  the  grid  points.  The  U  cells 
are  the  control  volume  ceils  tor  the  horizontal  velocity  components  U  which  are 
referenced  it  midway  between  two  neighboring  horizontal  grid  points. 

Similarly,  the  V  ceils  are  the  control  volume  cells  for  '.he  vertical  velocity 

components  V  which  are  referenced  at  midway  between  two  neighboring  vertical 
grid  points.  As  shown  in  Figure  1 ,  the  hoome ra ng- shaped  envelope  encloses  a 
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At  each  integration  step,  a  check  is  made  to  see  if  the  droplet  crosses 


either  a  C,  L  or  V  cell  houndary.  For  example,  if  a  drop  crosses  a  l'  cell 

boundary,  the  cell  it  has  just  departed  from  has  lost  some  axial  momentum  and 

the  cell  it  has  entered  has  gained  an  equal  amount  of  momentum.  This  is 

accounted  tor  by  adjusting  the  source  term  used  in  the  gas  phase  calculation. 
The  same  is  true  when  the  droplet  crosses  a  V  cell  boundary.  Provision  has 
been  made  to  account  for  thermal  energy  adjustment  as  the  droplet  crosses  the 
C  cell  boundary,  hut  this  source  term  adjustment  has  not  been  implemented  yet 
because  STARPIC  does  not  handle  energy  equation  calculations. 

The  source  terms  are  adjusted  at  each  integration  step,  and  the  process 
is  repeated  tor  the  remaining  ports.  Subsequent ly ,  the  gas  phase  calculations 
are  repeated  to  generate  a  new  gas  phase  solution  subject  to  the  adjusted 

droplet  source  terms.  The  xas  phase  velocity  distribution  is  checked  for 
convergence  between  two  consecutive  solutions.  A  mean  squared  difference 
convergence  criterion  is  used.  Flow  charts  tor  the  overall  solution  algorithm 
anil  the  droplet  calculation  procedure  are  presented  in  Figures  5  and  t> . 
is  determined.  The  information  is  needed  for  determining  the  cell  boundaries 
t tie  droplets  traverse  m  the  source  term  calculations. 
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III.  Program  Execution  Procedure 

In  an  attempt  to  keep  as  much  of  the  original  code  undisturbed  as 
possible,  some  of  the  variables  that  are  also  used  in  the  subroutines  for  the 
liquid  phase  calculations  are  duplicated.  A  listing  of  the  modified  STARPIC 
program  is  given  m  Appendix  A  with  the  inserted  sections  clearly  indicated. 
All  the  variables  used  m  the  liquid  phase  calculations  are  declared  in  two 
common  blocks,  namely  DROPS  and  GGF .  The  common  block  GGF  is  used  to  declare 
the  source  term  adjustment  variables  inserted  in  the  gas  phase  subroutines 
C.ALCL'  and  CALCV,  and  the  remaining  variables  are  declared  in  the  common  block 
DROPS . 

The  gas  phase  data  is  obtained  first,  and  the  corresponding 
initialization  subroutines  are  executed.  The  liquid  phase  data  is  then  read. 
The  user  must  choose  the  mode  to  input  data  hv  assigning  the  value  of  the 
integer  VDATA.  If  it  is  equal  to  0  only  the  gas  phase  calculations  are 
executed.  If  it  is  equal  to  1  the  data  is  read  interactively  from  the 
terminal.  It  it  is  equal  to  l,  the  data  is  read  from  a  tile.  If  it  is  equal 
to  3,  the  data  is  assigned  in  the  program  code.  Thus,  the  program  can  be  run 
both  interactively  or  in  a  batch  mode. 

The  variables  to  tie  supplied  for  the  liquid  phase  are: 

li)  M.AXP'tR.  the  total  number  of  ports  from  which  the  liquid  is  sprayed. 
A  maximum  of  10  is  allowed  hut  this  can  be  increased  by  modifying  the 
viriable  declaration  statements. 

1  ill  DRPOFN ,  the  liquid  density.  The  liquid  from  separate  ports  may  have 
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(.  v )  L'DINIT  and  VDINIT,  the  axial  and  radial  velocity  of  the  drop  at 
injection  (m/s ) . 

(vi j  TDINIT,  the  initial  temperature  of  the  liquid  (K). 

(viij  DRMDOT,  the  liquid  mass  flow  rate  from  the  port  (kg/s). 

The  location  of  the  lower  left  hand  corner  of  the  B-cell,  XB  and  YB,  are 
assigned.  All  flags  and  counters  are  initialized.  The  input  data  is  written 
into  i  file.  The  integration  time  step  and  scaling  factors  are  initialized. 
The  droplet  injection  frequency  is  calculated  from  the  mass  flow  rate. 

The  gas  phase  solution  is  now  executed,  and  the  equivalent  gas  velocity 
variables  used  in  the  liquid  phase  calculations  are  updated.  The  source  term 
adjustment  variables,  RM-  ‘MU  and  RMOMV ,  are  reinitialized  to  zero.  The 
subroutine  DROP  is  now  mvoked  to  perform  the  entire  liquid  phase 
calculations.  It  also  returns  the  global  convergence  flag  IFLAGZ.  If  the 
value  of  IFLAGZ  returned  is  1,  then  global  convergence  has  been  achieved. 
Consequent ly ,  the  gas  phase  results  are  printed  and  the  execution  is 
terminated.  [f  IFLAGZ  is  0,  the  system  has  not  converged  globally  and  the  gas 
phase  calculations  ar-  executed  again,  and  this  is  done  by  transferring  control 
to  statement  number  2000.  This  causes  a  re-execution  of  both  the  gas  phase  and 
liquid  phase  cu 1  on  1  a t i ons  until  either  convergence  is  achieved  or  until  the 
maximum  number  ot  iterations  allowed,  MAXCT,  is  exceeded. 

Subroutine  DRnp  is  invoked  by  the  main  program,  and  it  executes  all  the 
i  a  ic  u  lat  ions  required  for  the  liquid  phase.  A  brief  description  of  the 
subroutines  created  in  the  present  work  is  given  in  the  latter  part  of  this 
section.  To  begin,  the  droplet  location,  velocity,  temperature,  radius  and 
density  are  initialized  tor  the  first  injection  port.  Then,  the  flags  and 
lounters  are  initialized  to  zero.  Subroutine  FINDB  is  now  called  to  obtain  the 
B,  0,  U  and  V  cells  where  the  injection  port  is  located.  The  source  term 
adjustment  variables  RMuMT  and  RMOMV  at  the  injection  port  are  initialized. 


EGAS  and  VGAS  are  set  to  the  gas  velocities  of  the  mid-point  of  the  U  and 
V  celLs  where  the  droplet  is  located.  The  numerical  integration  subroutine 
RGN'GA  is  now  called  to  obtain  the  new  location  and  velocity  for  the  droplet. 

Subroutine  DOMCHK  is  called  to  check  if  the  droplet  is  inside  the  flow  domain. 

It  the  droplet  has  departed  from  the  flow  domain  the  flag  I H I T  is  set  to  1,  and 

the  control  is  transterred  to  statement  number  900  to  start  calculations  for 

the  next  port.  The  R  ceLl  in  which  the  droplet  is  located  after  integration  is 
identified  by  calling  subroutine  Fl.VDB.  The  subroutine  HJTVAL  is  then  called. 
If  the  droplet  has  hit  the  outside  wall,  IHIT  is  set  to  1  and  the  control  is 
transferred  to  statement  number  900  to  start  calculations  for  the  next  port. 
No  attempt  has  heen  made  to  account  for  the  history  of  the  droplet  after 
splashing  off  the  wall.  Also  excluded  are  the  possibility  of  the  drop  crossing 
the  center  line  or  colliding  with  any  other  droplet  as  reliable  models  for 

these  collisions  have  not  yet  been  developed.  If  the  droplet  is  still  in  the 
flow  domain,  subroutine  STPGHK  is  called  to  check  if  the  droplet  has  migrated 
to  one  of  the  eight  immediate  neighboring  B  cells.  If  the  droplet  remains 
inside  the  same  B  cell,  the  time  step  DT  is  increased  by  a  scaling  factor 

DUNG  and  the  integration  step  is  cedone  again  with  the  adjusted  time  step  to 
ensure  that  the  droplet  leaves  the  B  cell  in  one  integration  step.  If, 

however,  the  droplet  travels  beyond  one  of  the  eight  neighboring  cells,  the 
integration  time  step  is  reduced  by  a  scaling  factor  DTRED.  As  before,  the 

integration  step  is  redone  with  the  adjusted  time  step,  so  that  finally  the 

droplet  does  move  into  -,ne  of  its  neighboring  cells.  The  reason  for  this 
restriction  is  tor  easier  bookkeeping  of  the  droplet  sourie  term. 

The  integer  variable  NGASE  which  specifies  the  type  of  B  cell  is 
ietermined  t>v  caliing  subroutine  FINDN.  For  a  given  value  of  NCASE,  there  are 
oigtit  neighboring  cells  lti.it  the  droplet  may  enter.  This  is  shown  in  Figure  w. 
An  integer  variable  MG ASF.  is  used  to  signify  the  relative  position  of  the 
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neighboring  cells.  This  is  indicated  in  the  figure.  The  value  of  MCASE  is 
determined  by  calling  subroutine  FIMDM. 

There  are  all  together  thirty-two  different  cases  depending  on  the  values 
of  MCASE  and  .MCASE.  With  this  information  it  is  possible  to  identify  exactly 
which  C,  U  and  V  cell  boundaries  the  droplet  has  crossed.  If  a  L'  cell  boundary 
has  been  crossed,  a  linearly  interpolated  value  of  the  droplet  axial  velocity 
at  the  boundary  is  obtained  by  calling  subroutine  INTERP  and  the  source  term 
modification  variables  RMOMU  are  updated  by  calling  subroutine  CMOD . 
Similarly,  if  a  V  cell  subroutine  is  crossed,  the  variables  RMOMV  are  updated 
by  calling  subroutine  VMOD .  If  a  C  cell  boundary  has  been  crossed,  subroutine 
CMOD  is  invoked.  At  present,  subroutine  CMOD  has  no  executable  statements,  but 
it  can  be  used  to  update  the  source  terms  corresponding  to  temperature  and 
other  variables  when  the  thermal  energy  calculations  for  the  liquid  phase  are 
implemented.  Once  the  source  term  variables  have  been  updated,  the  location  of 
the  droplet  is  stored  into  a  file.  The  counter  ISTEPS  is  incremented.  If 
ISTEPS  exceeds  the  maximum  number  of  steps  allowed,  as  would  be  the  case  if  the 
droplet  enters  a  rec i rru la t ion  zone,  the  calculations  for  the  next  port  are 
1  in  1 1 a  ted . 

When  the  calculations  for  all  the  ports  are  completed,  subroutine  COMPAR 
is  tailed  to  check  for  convergence  by  comparing  the  two  consecutive  gas  phase 
solutions,  and  then  control  is  returned  to  the  main  program. 

Several  spray  caUuiations  have  been  performed  using  the  present  modified 
STARP1C  program.  These  include  spray  injection  at  the  inlet  perimeter  as  well 
is  it  the  inlet  center  with  various  droplet  diameters  and  initial  velocities. 
In  most  cases,  three  (  5)  overall  global  iterations  between  gas  phase  and 
liquid  phase  <  a  1  c  u  1  a  l  l  "ii  s  is  needed 

A  comprehensive  d<  ■*  uinen  t  a  t  i  on  on  STARPIC  is  given  in  [  Z  ]  .  Here  a  brief 
description  of  the  various  subroutines  inserted  in  the  present  modified 
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STARPIC  code  is  given  below  folLowed  by  a  nomenclature  list  of  the 
used  in  these  subroutines. 


variables 


[~Subr out  i n e_  DROP  ~| 

DROP  is  the  master  subroutine  that  when  invoked  by  the  main  program, 
obtains  the  trajectories  of  all  the  droplets.  A  major  function  of  this 
subroutine  is  to  keep  track  of  the  droplet  location  with  respect  to  the  B.C.L 
and  V  cells.  Whenever,  the  droplet  crosses  one  of  the  control  volume  cells 
C ,  U ,  or  V,  the  corresponding  subroutines  CMOD,  VMOD  and  L’MOD  and  are  called  to 
adjust  the  source  terms  for  these  cells.  The  gas  phase  solution  convergeru  e 
is  checked  by  calling  subroutine  COMP.AR  after  the  liquid  phase  calculation  ; , 
completed.  The  t  low  chart  tor  this  subroutine  is  shown  in  Fig.  t> . 

[Js_u br o u 1 1 ne  _ FJ N t) B~j 

FI.VDB  returns  the  index  numbers  IB  and  JB  corresponding  to  the  B  cell 
that  the  droplet  is  in  FIN'DB  also  returns  the  index  numbers  1C,  JO,  11,  il’. 
IV  and  if  corresponding  to  the  C.l  and  V  cells  that  the  droplet  is  in. 

[Subroutine  D'cMtHK  j 

U"MfHK  returns  a  nonzero  value  for  the  flag  1 H  IT  if  the  drop  has  left 
t  he  t  .  'W  1  ma  ;  n  . 

I  Sub rou t . ne  ! M'KKP  ] 

Performs  linear  interpolation  between  two  points. 
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[Subroutine  FINDM  ] 

The  B  cell  to  which  the  droplet  travels  can  have  one  of  four  locations  in 
the  main  grid  cell.  FI  SDH  returns  the  value  of  MCASE  corresponding  to  the 
ce  1 1  locat  ion . 


[~S\ib rout  1  ne^  FINDS  | 


FINDS  returns  the  value  of  NCASE  corresponding  to  the  one  of  eight 
neighboring  cells  that  the  droplet  can  travel  to. 

[  Sub  rout i ne  STPCHK J 

STPCHK  checks  if  the  drop  travels  to  one  of  the  neighboring  cells.  The 
time  step  is  increased  it  the  drop  did  not  cross  any  cell  boundary,  or  reduced 
if  the  drop  has  travelled  beyond  a  neighboring  cell. 

|  Subroutine  j 'MPAR  1 

CQMPAR  checks  ror  the  global  convergence  of  the  system,  and  is  invoked  by 
Subroutine  DROP,  liter  the  liquid  phase  calculations  are  complete.  The 
iverage  squared  ^as  velocity  error  is  used  is  the  criterion  for  convergence. 

|  Subroutine  Kl'NuA  j 

RLNi’.A  does  the  numeric  il  integration  of  a  system  of  first,  order  ordinary 
differential  e. ju.it i  .ns  by  t  iurth  order  Runga  Kutta  numerical  integration,  and 
:s  sailed  hv  Subroutine  DRc.P  for  each  integration  step.  The  derivative  values 
ire  obtained  by  calling  Sub  rout i ne  XPSYS . 

(  Subroutine  HI  TWAL 

The  flag  I  HIT  is  set  t  ■  i  it  the  droplet  has  hit  the  cuter  wall. 
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Subroutine  UMOD 


The  source  terms  for  axial  momentum  are  adjusted  to  account  for  the 
droplet  crossing  a  L'  boundary. 

_  Sub  routine  VMOD  ) 

The  source  terms  for  radial  momentum  are  adjusted  to  account  for  the 
droplet  crossing  a  V  cell  boundary. 

Nomenc 1 ature 

I  .MERGER  VARIABLES: 

IB  -  AXIAL  1 NDEX  NUMBER  FOR  THE  B  CELL. 

; bold  -  old  axial  index  number  for  the  b  cell. 

:c  -  AXIAL  INDEX  NUMBER  FOR  THE  C  CELL. 

I  COUNT  -  COUNTER  FOR  NUMBER  OF  LIQUID  PHASE  ITERATIONS 

I  FLASH  -  C1L0BAL  CONVERGENCE  FLAG. 

I  HIT  -  FLAG:  0  IF  DROP  IS  IS  THE  FLOW  DOMAIN. 

INTCTR  -  NUMBER  wF  RE- INTEGRATIONS . 

I N  IF  LG  -  INTEGRATION  FLAG. 

I  STEPS  -  NUMBER  "F  STEPS  TRAVELLED  BY  THE  DROP. 

V  -  AXIAL  INDEX  NUMBER  FOR  THE  V  CELL. 

-  AXIAL  INDEX  NUMBER  FOR  THE  V  CELL. 

Ih  -  RADIAL  INDEX  NUMBER  FOR  THE  B  CELL. 

IB'CT  -  "I.D  RADIAL  INDEX  NUMBER  FOR  THE  B  CELL. 

.C  -  RADIAL  INDEX  NUMBER  FuR  THE  C  CELL. 

.'  UMAX  i  I  -  VARIABLE  EQUIVALENT  Tu  ,'M.AXl  I  IN  THE  MAIN  PROGRAM. 

D  -  RADIAL  INDEX  NUMBER  FOR  THE  V.  CELL. 


RADIAL  INDEX  NUMBER  FuR  THE  V  CELL. 


MAXCT 


MAXIMUM  NUMBER  OF  OVERALL  GAS-PHASE  LI  QUID- PHASE 


ITERATIONS  ALLOWED. 

MAXPOR 

-  MAXIMUM  NUMBER  OF  PORTS. 

MAXSTP 

-  MAXIMUM  NUMBER  OF  STEPS  ALLuWED 

FOR  DROP. 

SPORT 

-  PORT  NUMBER . 

NDI 

-  VARIABLE  EQUIVALENT  TO  NI 

IN 

THE 

MAIN  PROGRAM 

NDJ 

-  VARIABLE  EQUIVALENT  TO  N.J 

IN 

THE 

MAIN  PROGRAM . 

REAL  VARIABLES: 


ODD 

DRPDENi V  I 
DRPDIAl N  ) 

r\  r 

l..'  1 

DTI  SC 
DIKED 
IRAVX 


COEFFICIENT  nF  DRAG  FOR  THE  DROPI.ET. 
LIQUID  DENSITY  of  PoRT  NUMBER  N. 

DROP  DIAMETER  ■  F  PORT  NUMBER  N. 
INTEGRATION  TIME  STEP. 

INCREMENT  SCALE  FACTOR  FoR  DT 
REDUCTION  SCALE  FACTOR  FOR  DT . 

AXIAL  ACCELERATION  FoRCE  COMPONENT. 


GRAVY 

-  RADIAL  ACCELERATION  FuRCE  COMPONENT. 

PI 

-  U  I  -» 1  5  ’  )  J  b  S 

RAD 

-  DROPLET  RAD  1 1  s 

RHuGAS 

-  DENSITY  oF  THF. 

GAS  . 

R.MOMUi 

-  '  'MR  i  BIT  I 'A  To 

AX  I A L  MOMENTUM  SoURCE 

TEkM . 

KMoMVi  i 

-  Contribution  :• 

RADIAL  MOMENTUM  SOURCE 

TERM 

I'D  I N  I T  i  i 

-  INITIAL  TEMPERATURE  OF  DROPI.ET. 

TDNF.U 

-  NEW  TEMPERA P  RF 

■-F  DROPLET  . 

TDOLD 

-  oi.D  TFMPERAT'  RE 

"F  DROPLET. 

I  DINITi  i 

-  INITIAL  AXIAL  V 

FLoCITY  "F  DROPLET 

'  DNEW 

-  NEW  AXIAL  VF.L  o 

I  I Y  of  DRoPLFT. 

I  DOLD 


1 1.D  AXIAL  YF  I.  'C  I  TY  1  T  DRoPLET 


N 


w 


UG() 

L'GAS 
UGOLDO 
VDINITI ) 
^T)  NEW 
VDOLD 
VG( ) 

VGAS 
VGOLD() 
XB( ) 

XDINITI  ) 
XDNEW 
XDOLD 
VB  ( ,) 

VDINITt  ) 

VDNEW 

VDOLD 


-  VARIABLE  EQUIVALENT  TO  U(  )  IN  THE  MAIN  PROGRAM . 

-  .AXIAL  VELOCITY  OF  THE  GAS. 

-  OLD  AXIAL  VELOCITY  OF  GAS. 

-  INITIAL  RADIAL  VELOCITY  OF  DROPLET. 

-  NEW  RADIAL  VELOCITY  OF  DROPLET. 

-  OLD  RADIAL  VELOCITY  OF  DROPLET. 

-  VARIABLE  EQUIVALENT  TO  V(  )  IN  THE  MAIN  PROGRAM. 

-  RADIAL  VELOCITY  OF  THE  GAS. 

-  OLD  RADIAL  VELOCITY  OF  GAS- 

-  AXIAL  COORDINATE  OF  LOWER  LEFT  CORNER  OF  B-CELL. 

-  INITIAL  .AXIAL-COORDINATE  OF  DROPLET. 

-  NEW  AXIAL  LOCATION  OF  DROPLET. 

-  OLD  AXIAL  LOCATION  OF  DROPLET. 

-  RADIAL-COORDINATE  OF  LOWER  LEFT  CORNER  OF  B-CELL. 

-  INITIAL  RADIAL-COORDINATE  OF  DROPLET. 

-  NEW  RADIAL  LOCATION  OF  DROPLET. 

-  '  ,_D  RADIAL  LOCATION  OF  DROPLET. 
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IV.  Plotting  Programs 


A .  Streamline  Plot 

The  first  step  of  the  process  is  to  generate  plotting  data  from  the  data 
generated  in  the  STARPIC  program.  Just  before  the  modified  STARPIC  program 
ends,  the  subroutine  STRMSORT  is  called.  To  this  subroutine,  the  following 
generated  data  is  passed:  array  of  stream  function  values  for  grid  points,  the 
number  of  1  grid  lines,  the  number  of  j  grid  lines  for  each  i  grid  value,  an 
array  of  the  x  values  corresponding  to  each  i  grid  line,  and  an  array  of  the  v 
values  corresponding  to  each  j  grid  line.  The  subroutine  STRMSORT  first 
generates  the  outer  boundary  line  points  for  the  combustor  through  the  use  of 
the  I  MAX  and  JMAX  values.  The  maximum  j  value  is  found  for  each  i  value  up  to 
IMAX,  the  last  i  grid  line  within  the  combustor.  As  each  outer  j  coordinate  is 
found  it  is  checked  against  the  previous  one.  If  it  is  different,  then  it 
is  assumed  that  the  expansion  step  has  occurred  between  this  i  grid  line  and 
the  last.  In  this  case  two  extra  points  are  included,  defining  the  corners  of 
the  step,  then  the  rest  of  the  points.  As  each  point  is  defined  the  boundary 
j  value  is  corrected  by  averaging  between  the  last  active  j  line  and  the  first 
one  outside  the  boundary.  The  i  and  j  values  are  converted  to  their 
corresponding  x  and  y  values  respectively  as  each  point  is  found.  The  boundary 
points  are  then  written  to  a  disk  file  and  followed  by  an  end  of  block  marker, 
999.9  for  both  x  and  y  values  to  signify  the  end  of  a  line  definition.  When 
the  points  are  recorded  on  disk  they  are  recorded  x  value  first  then  y  value 
for  each  point.  This  is  true  of  all  points,  boundary  or  otherwise. 

Now,  the  main  loop  of  the  STRMSORT  is  executed.  A  listing  of  the 
subroutine  is  given  in  Appendix  B.  First  a  stream  function  value  is  defined 
for  the  particular  streamline,  lines  2073  to  2079.  Next  the  subroutine  INTERP 
is  called.  As  is  explained  later,  INTERP  finds  the  actual  points  with  the 
previously  defined  s t ream- funct ion  value.  Once  execution  has  returned  from  the 
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l.MTERP  subroutine,  STRMSORT  checks  for  the  existence  of  two  special  cases.  The 
first  is  no  points  found  with  the  desired  stream  function  value.  If  this 
occurs,  the  next  value  is  defined  and  execution  continues.  The  other  special 
case  is  when  the  stream-function  value  is  greater  than  1.0.  When  this  occurs, 
it  is  assumed  that  a  loop  exists  and  the  loop  sort  section  is  executed.  Once 
the  special  cases  are  handled,  the  points  are  converted  from  i,j  coordinates  to 
x,y  coordinates  for  plotting. 

The  i,j  to  x,y  conversion  section,  lines  2086  to  2106,  first  checks  to 
see  if  the  i  coordinate  is  an  integer.  If  so,  then  the  i  grid  coordinate  is 
converted  directly  to  an  x  value  with  the  appropriate  number  from  the  array 
'X'.  If  not,  then  the  x  value  is  interpolated  linearly  between  the  x  values 
of  the  two  consecutive  i  grid  lines  surrounding  the  point.  The  y  value  of  the 
point  is  interpolated  from  the  j  grid  value  in  the  same  manner. 

The  sorting  of  the  points  of  a  loop  is  accomplished  in  lines  211W  through 
2153.  Since  the  interpolation  routine  selects  points  along  set  i  grid  lines, 
it  is  assumed  that  the  points  in  a  loop  will  occur  in  pairs,  with  the  possible 
exception  of  the  ends  of  the  loop.  Since  the  interpolation  routine  selects 
points  by  starting  at  the  inlet  and  ending  at  the  outlet,  the  points  or 
point-pairs  are  in  ascending  order  by  i  grid  value.  In  these  pairs  of  points 
the  point  with  the  higher  j  grid  value  occurs  second  because  the  interpolation 
routine  checks  the  j  grid  intervals  starting  at  the  centerline  and  moving 
outward  to  the  boundary.  The  first  step  in  sorting  for  the  loop  is  splitting 
up  the  pairs.  In  lines  2116  to  2133,  a  loop  is  executed  in  which  the  i  grid 
value  of  each  point  is  compared  with  the  previous  point.  If  if  matches,  this 
point  is  the  upper  point  of  the  pair  and  is  put  at  the  bottom  of  the  temporary 
storage  array  'TEMPPTS'  .  The  points  are  to  be  sorted  so  that  the  loop  is 
plotted  counter-clockwise  starting  with  outer  point  with  the  highest  i  grid 
value.  With  this  in  mind,  the  upper  points  are  placed  in  the  temporary  array 
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starting  at  the  bottom  of  the  array  so  that  their  order  is  reversed,  and  the 
lower  points  and  any  single  points  are  placed  in  the  temporary  array  in  the 


order  of  occurrence  starting  at  the  top.  In  lines  2134  through  2143,  the 
upper  points  are  moved  to  the  top  of  the  array  and  the  lower  points  are  moved 
down  with  no  change  in  order  for  either  group.  The  points  are  now  in  the 
proper  order  for  plotting  as  a  loop.  As  a  final  step,  the  first  point  is 
added  at  the  end  to  close  the  loop  in  plotting.  If  the  first  point  occurs  at 
the  outlet  boundary,  it  is  not  added  because  this  would  indicate  that  the  loop 
continued  out  of  the  control  region. 

The  interpolation  subroutine  I.NTERP  functions  as  follows.  Starting  at 
the  centerline  and  moving  outward,  each  j  grid  interval  is  checked  to  see  if 
the  specified  stream  function  value  exists  in  it.  This  is  carried  out  along 
each  i  grid  line  starting  at  the  inlet  and  proceeding  toward  the  outlet.  If 
the  desired  stream  function  value  is  less  than  or  equal  to  one,  each  j  interval 
is  checked  until  the  outer  value  of  the  interval  is  lower  than  the  inner  value. 
When  this  occurs,  the  process  restarts  at  the  next  i  grid  line.  If  the  desired 
value  does  fall  within  the  interval,  the  actual  j  grid  value  is  found  by 
linearly  interpolating  between  the  inner  and  outer  boundary  values  for  that 
interval,  lines  2197  to  2201.  Two  special  cases  are  handled  by  the  inter¬ 
polation  routine.  The  first  is  when  the  desired  streamline  has  the  value 


one.  When  this  occurs,  the  first  i  grid  line  checked  is  immediately  following 
the  expansion  corner.  Before  the  interpolation  loop  is  executed,  though,  the 
lower  corner  point  is  added.  If  the  last  point  is  not  at  the  outlet  boundary, 
the  last  two  points  are  used  to  linearly  extrapolate  the  intersection  with  the 
outer  boundary,  with  this  point  being  added  at  the  end.  The  second  special 
case  is  when  the  desired  stream  function  value  is  greater  than  one.  When  this 
occurs,  the  interpolation  loop  checks  every  interval  out  to  the  boundary.  This 
is  to  capture  the  points  in  the  recirculation  region. 
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The  plotting  program  STRMPLOT  functions  as  follows.  The  program  reads 
points  until  either  the  end  of  bLock  marker  '999.9'  or  the  end  of  file  marker 
'888.8'  is  read.  When  the  end  of  file  marker  is  read  the  points  that  have 
been  read  are  processed  and  plotted.  If  it  is  the  first  group  of  points,  it 
is  considered  to  be  the  boundary  points.  From  this  group  the  scaling  factor 
is  determined  to  make  the  plot  10  inches  long,  lines  45  and  46.  These  scaling 
factors  are  applied  to  every  group  of  points.  This  first  group  is  then  scaled, 
lines  47  to  56,  and  then  plotted.  Connecting  lines  to  complete  the  boundary 
are  then  plotted  using  the  first  and  last  points,  lines  59  to  71.  An  arrow  is 
then  plotted  to  indicate  the  flow  direction.  Each  succeeding  group  of  points 
is  then  read,  scaled  and  plotted  using  smooth  lines  to  connect  the  points. 
When  the  end  of  file  marker  is  read  the  plot  is  ended. 

Two  streamline  plots  generated  by  these  programs  are  shown  in  Figure  7. 

B .  Universal  Plot 

STRMSORT  is  a  very  specialized  point  generating  subroutine  that  is 
designed  specifically  for  stream  function  plotting  and  is  therefore  unsuitable 
for  plotting  anything  but  stream  function.  For  this  reason,  a  more  universal 
point  generating  program,  PLOTGEN,  is  developed  along  with  a  plotting 
post-processor,  PLOTR,  which  is  taken  almost  directly  from  its  predecessor, 
STRMPLOT,  with  minor  modifications  allowing  easier  user  selection  of  plotting 
opt  ions . 

The  assumptions  and  limitations  in  the  theory  behind  PLOTGEN  FOR  are  as 
follows.  The  first  and  most  important  assumption  is  that  physical  properties 
are  continuous.  It  is  also  assumed  that  if  two  points  are  close  enough 
together  and  the  property  values  are  known  at  these  two  points,  that  a  point, 
whose  property  value  is  between  the  other  two,  can  be  located  with  sufficient 
accuracy  by  the  linear  proportional  distance  between  the  two  previous  points 
corresponding  to  the  proportionality  of  the  corresponding  property  values. 
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It  is  further  assumed  that  if  two  points  exist  such  that  their  property  values 
are  the  same  and  the  spaciaL  intervals  surrounding  these  two  points  immediately 
border  each  other,  horizontally,  vertically  or  diagonally,  that  these  two 
points  may  be  connected  by  a  line  or  similar  curve  along  which  the  property 
value  is  constant.  PLOTGEN  is  limited  to  working  with  cases  in  which  a 
property  is  a  function  of  the  physical  point  of  interest  in  a  two  dimensional 
cartesian-coordinate  plane. 

The  first  step  in  generating  the  plotting  data,  is  to  find  points  whose 
property  value  equals  the  desired.  To  do  this,  the  interval  between  each  pair 
of  grid  points,  that  neighbor  either  vertically  or  horizontally,  is  checked  to 
determine  whether  the  desired  property  value  occurs  between  these  two  grid 
points.  If  the  value  does  occur  between  in  this  interval,  the  location  of 
this  new  point  is  taken  to  correspond  to  the  linear  proportionality  of  the 
desired  property  value  within  the  interval.  Since  both  grid  points  have  either 
the  same  x-value  or  the  same  y-value,  one  coordinate  of  the  new  point  is  known. 
To  find  the  other  point,  the  value  is  found  through  linear  interpolation  on  the 
range  between  the  two  grid  points.  In  this  way,  a  set  of  points  whose  property 
value  is  given,  can  be  physically  located.  The  next  step  is  to  connect  these 
points  to  produce  a  plot. 

The  method  of  detecting  point  links  and  of  linking  these  points 
approximates  the  method  a  human  would  use  if  provided  with  only  a  group  of 
points.  The  first  step  is  to  find  a  point  in  the  set  of  points.  In  this 
case,  find  the  lowest  that  is  farthest  to  the  left.  With  this  point,  there  is 
an  associated  interval,  between  two  grid  points  on  some  known  grid  line. 
Around  this  interval,  there  are  eight  other-bordering  intervals;  four 
diagonally,  two  vertically,  and  two  horizontally.  Beginning  with  the  direction 
from  which  the  current  point  was  found,  proceed  in  a  counter-clockwise 
direction,  checking  each  of  these  eight  intervals  until  another  point  is 


35.22 


detected . 


If  a  point  is  detected,  then  the  plot  will  he  connected  to  this  new 


point,  and  the  intervals  around  this  new  point  are  checked  tor  new  points 
This  continues  until  a  point  is  reached  where  no  adjoining  point  is  detected, 
it  this  occurs,  the  location  of  the  first  point  of  this  plot  line  is  checked, 
it  this  first  point  would  have  been  detected  here,  it  is  repeated  to  close  the 
curve.  After  this  the  process  starts  again  with  another  first  point  until  all 
it  the  points  have  been  used.  Only  the  intervals  between  active  grid  points 
are  checked  as  outlying  points  cou'd  cause  error. 

The  program  PLuTGEN  is  written  in  a  block  style  to  make  programming  and 
modification  easier.  A  listing  of  the  program  is  given  in  Appendix  D.  In  the 
setup  section,  the  variables  are  defined  in  comment  statements  and  declared. 
Here  also,  the  point  arrays  and  control  variables  are  initialized.  In  the  read 
section,  the  data  table  with  the  data  to  be  plotted,  is  read  into  the  program 
for  processing.  This  section  includes  subsections  to  read  from  either  the 
STAKP1C  or  the  TEACH  output.  Following  this  is  the  boundary  definition 
section.  Here,  the  physicaL  boundaries  are  determined  and  output  to  the  plot 
file.  Here  also,  the  grid  boundaries  for  the  rest  of  the  program  are  set.  The 
next  sections  work  together  in  the  master  loop.  The  first  section  determines 
in  which  intervals  the  plot  points  are  found  and  where  within  each  of  these 
intervals  the  point  is  located.  Following  this,  the  first  point  section 
searches  the  two  interval  arrays  to  find  a  first  point  for  plotting.  The 
succeeding  points  section  then  attempts  to  link  up  adjoining  points.  The  last 
section  checks  for  the  case  where  the  last  point  adjoins  the  location  of  the 
first  point. 

At  the  first  of  the  setup  section,  there  is  a  large  group  of  comment 
statements  defining  the  use  or  purpose  of  each  variable.  Following  this,  the 
arrays  and  variables  are  declared  with  the  appropriate  types.  Certain 
variables  and  arrays  are  then  loaded  with  the  proper  values.  Next,  the  array 
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VALUE  is  initialized  with  the  desired  property  values  for  plotting.  Here  the 
user  sets  N'UMVALS  to  the  number  of  values  to  be  plotted.  Finally,  the  interval 
arrays  are  set  to  -1  in  every  cell  to  indicate  no  point  present. 

In  the  read  section,  the  data  table  for  plotting  is  read  according  to  the 
format  type  set  by  the  variable  READTYP .  If  READTYP  equals  one  the  data  is 
read  in  the  TEACH  format,  if  two  it  is  read  in  the  STARPIC  format. 

At  the  beginning  of  the  boundary  definition  section,  the  plot  file  is 

opened  with  the  desired  file  name.  Beginning  at  the  left,  each  1  grid  line  is 
checked  from  the  bottom  up  until  a  zero  value  is  found.  This  grid  point  is 
assumed  to  be  the  first  beyond  the  wall,  so  the  median  value  between  this 

point  and  the  previous  grid  point  is  converted  to  x,y  coordinates  and  output 
to  the  plot  file.  This  occurs  at  every  1  grid  line  until  the  first  1  grid 

line  of  zeroes  is  found.  This  is  assumed  to  be  the  right  end  wall,  so  the 

value  between  this  grid  line  and  Last  is  used  to  define  the  wall.  The  left 
wall  was  assumed  to  occur  at  an  x  value  of  zero.  If  a  step  is  detected  as  the 
upper  wa L L  is  being  defined,  the  step  is  defined  by  two  points  whose  x  value 
equals  the  median  of  the  two  succeeding  i  grid  lines  and  with  the  y  values 
equaL  to  that  of  the  appropriate  j  ,qr,.J  line.  After  the  boundary  points  have 
been  output,  the  value  0.0  is  output  to  close  the  boundary  curve  and  the  end 
of  group  marker,  999.9,  and  the  symbol  change  marker,  777.7,  are  output. 

The  next  four  sections  work  together  in  the  master  loop.  In  the  first, 
t fie  point  detection  section,  the  interval  to  the  right  and  the  interval  above 
each  point  is  checked  for  the  occurrence  of  each  desired  value.  If  this  value 
is  on  a  horizontal  grid  line,  the  proportional  location  of  the  plot  point 
between  the  two  end  points  of  the  interval,  is  stored  in  the  interval  array  as 
tvpe-one  point  and  the  counter  of  plot  points  found,  PTNUM ,  is  incremented. 
Points  found  in  vertical  intervals  are  stored  as  type-two  points.  Points  are 
stored  in  the  interval  array  location  corresponding  to  either  the  left  or 
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lower  grid  location  of  the  interval,  whichever  is  appropriate.  If  the  grid 
location  currently  being  checked  for  a  plot  point  is  at  the  maximum  1  grid 
line,  the  interval  to  the  right  of  the  grid  point  is  not  checked.  Similarly, 
the  intervals  above  grid  points  on  the  maximum  j  grid  location  of  each  i  grid 
line  are  not  checked.  This  is  to  avoid  detecting  phantom  points  at  the  wall. 

The  next  block  of  statements  checks  through  the  interval  array  to  find 
one  with  a  point.  In  this  case,  the  intervals  that  do  not  contain  a  point  are 
represented  by  a  value  of  -1  in  the  corresponding  array  cell.  If  the  interval 
contains  a  point,  its  corresponding  array  cell  will  contain  a  value  equal  to 
or  greater  than  zero  and  less  than  one.  This  value  is  the  proportional 

location  of  the  plot  point  between  the  two  grid  points  at  the  ends  of  the 

interval.  To  find  a  point,  the  intervals  are  checked  along  each  i  grid  line 
from  left  to  right  and  from  the  inside  j  value  out,  with  the  type  one  ceil 
checked  first.  When  a  point  is  found,  its  grid  coordinates  are  converted  to 
x,y  coordinates  and  the  point  is  written  to  the  plot  file.  The  i ,  j  address  of 
the  interval  of  this  point  are  saved  along  with  the  type  of  the  first  point 
and  its  x,y  coordinates.  This  interval  is  then  cleared,  set  to  -1,  and  the 
point  counter  decremented,  so  this  point  will  not  be  discovered  again. 
Execution  continues  with  the  succeeding  points  section. 

The  succeeding  points  section  is  the  heart  of  this  plotting  scheme. 

Here,  the  points  are  linked  up  to  form  lines,  loops  anil  other  curves.  Upon 
entering  this  section  the  i,  j,  and  point-type  values  are  those  of  the  previous 
point,  and  the  direction  is  assumed  to  be  three.  Here  the  eight  cells 
adjoining  the  previous  point  are  checked  for  a  neighboring  point.  The 
addresses  of  these  eight  cells  are  a  function  of  the  location  of  the  previous 
point,  its  type,  and  the  direction  from  the  previous  point  to  the  cell  to  be 
checked.  The  type  of  each  cell  to  be  checked  is  the  same  as  the  previous 
point  if  adjoins  the  previous  point  vertically  or  horizontally.  If  the  new 
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cell  neighbors  the  previous  cell  diagonally,  the  new  cell  is  of  the  opposite 
type.  The  i,j  address  of  the  new  cell  is  found  by  adding  the  appropriate 
delta  values  to  the  i,j  coordinates  of  the  previous  point.  The  delta  1  value 
is  found  from  the  array  DELI  and  is  indexed  by  the  type  of  the  previous  point 
and  the  direction  from  the  previous  cell  to  the  new  cell.  The  delta  j  value 
is  found  similarly  from  the  array  DELJ.  These  parameters  are  used  to  check 
the  intervals  in  the  eight  directions  proceeding  counter-clockwise,  with  the 
direction  one  being  to  the  right.  The  first  direction  checked  is  one  past  the 
direction  from  which  the  previous  point  was  found.  The  neighboring  intervals 
are  checked  until  either  a  new  point  is  found  or  all  directions  have  been 
checked.  If  a  new  point  is  found,  its  grid  coordinates,  one  of  which  is  on  a 
grid  line  and  the  other  is  between  two  lines,  are  converted  to  x,y  coordinates 
and  the  point  is  written  to  the  plot  file.  The  interval  is  then  cleared  and 
the  point  counter  decremented.  The  linking  procedure  is  then  repeated  with 
this  new  point  being  the  previous  value.  If  no  point  were  found  execution 
would  continue  at  the  last  point  section. 

In  the  last  point  section,  the  most  recently  found  point  is  checked  to 
see  if  it  borders  the  first  point  in  this  plot  line.  If  these  two  points  do 
not  border  or  they  are  the  same  point,  the  end  of  block  marker,  999.9,  is 
written  to  the  plot  file.  It  point  counter  is  greater  than  zero  then  execution 
continues  at  the  first  point  section.  If  all  of  the  points  have  been  used,  the 
symbol  change  marker,  777.7,  is  written  to  the  plot  file  and  execution 
continues  at  the  start  of  the  master  loop  for  a  new  property  value.  If  the 
last  point  and  the  first  point  do  border  each  other,  then  the  first  point  is 
again  written  to  the  plot  file  to  close  the  curve,  and  the  end  of  block  marker 
is  also  written  to  file.  Execution  continues  as  in  above,  according  to  whether 
or  not  all  of  the  points  have  been  used.  If  this  is  the  last  point  and  the 
last  property  value  to  be  plotted,  the  end  of  file  marker,  888.8,  is  written  to 


tile,  the  tile  ilosed  and  the  program  ended. 


otherwise,  execution 


v  ont : nues 

until  whole  list  ut  desire.)  property  values  is  exhausted. 

FLuTR  is  a  simple  plotting  post -processor  designed  as  a  companion  t  . 
PLOTGEN.  It  is  composed  ot  tour  major  sections.  The  tirst  is  the  set  up  and 
initialization  section.  Here  the  variables  ire  defined  and  declared  i'he 
user  defined  parameters,  with  the  exception  ot  plot  tile  name,  are  set.  The 
appropriate  value  of  LTYP  is  set  to  produce  lines,  symbols  or  a  combination  ot 
the  two.  Following  this  is  the  master  read  loop.  In  this  loop,  points  are 
read  into  two  arrays,  one  each  for  the  x  and  v  coordinates  of  the  plot  points, 
until  a  control  code  is  read.  If  the  control  code  is  777.7,  the  symbol  number 
is  incremented.  If  the  code  is  999.9  and  this  is  first  group  of  points, 
control  passes  to  the  boundary  plot  section.  If  the  code  is  999.9  and  this  is 
not  the  first  point  group,  the  control  passes  the  standard  plot  section.  If 
the  code  888.8  is  read,  the  plot  is  ended,  the  plot  file  closed  and  the  program 
ended . 

In  the  boundary  plot  section  the  boundary  is  plotted  and  the  scaling 
factors  jre  set.  Since  a  counter  of  points  read  was  kept  in  the  read  loop 
section,  the  number  of  points  in  this  group  is  known.  Since  the  last  point  of 
the  boundary  definition  will  be  0.0  the  second  to  last  point  will  have  the 
maximum  y  value.  With  this  in  mind,  the  scaling  factor  for  both  x  and  y  scales 
is  set  so  that  the  maximum  v  value  is  plotted  as  some  desired  value,  such  as 
1.5  inches.  To  produce  a  pLot  that  is  compressed  or  expanded  in  the  x 
direction,  the  scaling  factor  tor  the  x  scale  can  he  divided  or  multiplied  hv 
an  appropriate  factor.  The  boundary  points  are  then  each  scaled  and  sent  to 
the  plotter  in  the  order  in  which  they  occur  in  the  plot  file.  A  flow- 
direction  arrow  is  then  plotted  by  calling  the  subroutine  AROHD .  Control  then 
passes  back  to  the  read  loop  section. 
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In  the  standard  plot  section,  the  plot  points  representing  the  lata  table 
ire  si  ilfl  l n <  1  plotted.  Using  the  scale  factors  determined  in  the  boundary 
plot  sett!  ’ii.  Koch  point  is  scaled  and  then  sent  to  plotter  in  the  order  in 
-hiiti  it  on  urs  ;n  the  plot  tile.  It  the  value  of  the  point  counter,  NTH  FT  S , 
is  ., -•  t  to  its  negative  m  the  subroutine  i'ail  to  FLINE,  the  points  will  tie 
Connected  with  a  smooth  curve  tit  to  the  plot  points.  Control  is  then  passed 
bacK  to  the  read  loop  section. 

Included  with  this  report  ire  two  sample  plots.  The  first  one  shown  in 
Figure  b  is  the  mixture  ratio  predicted  by  TEACH  code.  The  inlet  t ue 1 
temperature  at  the  center  is  at  -oO  K  jnd  the  air  inlet  temperature  at  the 
outer  annular  is  at  }U0  K.  The  other  one  shown  in  Figure  9  is  the  temperature 
profile  predicted  by  TEACH  from  the  same  calculation. 
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A  tuei-sprav  mode  1  has  been  successful  ly  implemented  into  the  STARPI C  ••  le 
r.  1  h  .ill.. .us  ,  i  .  i  u  i  a  t  i .  ns  ot  multiphase  flow  in  a  dump  combustor  .  While  S  TARRC 
.nd  STAR  PI'.'.  ‘  "th  belong  to  the  TEACH,  there  is  n.  toreseeable  dift  iculty  ;  n 
■;< tending  the  tn el-spray  model  developed  on  the  present  study  t  >  STARRc  r 


A  set  it  computer  programs  to  plot  the  streamlines  as  ueii  as  other 
roperties  such  as  isotherms  have  also  been  developed.  The  plots  generated  by 
hese  programs  tan  help  make  the  interpretations  ut  data  easier.  These 


otting  software  can  also  he  used  with  minor  modifications  to  produce  pen 


{  its  ot  the  output  r  other  similar  programs 


He  t e  rentes 


A.  Y.  Ton*,  -Numerical  Modeling  of  Multiphase  Turbulent  Recirculating 
r.o'.s  m  Sudden- Expans  ion  Ramjet  Geometry,"  CSAF-SCEEE  SFRP  Final  Report 
<  AF-.9O20-82-C-0035 ;  August  1984). 

D.  G.  Li  1  ley  and  D.  L.  Rhode,  "A  Computer  Code  tor  Swirling  Turbulent 
Ax  1 s\ mme t r  i  c  Recirculating  Flows  in  Practical  Isothermal  Combustor 
Geometries,"  NASA  Contractor  Report  3-.G2  . 


FIGURES 


35.32 


Initialize  gas  phase 


Convergence  achieved  ? 


:  oi  c  c 
0  02  oo 
o  co  o  c 

(.•  Oh  C  C 
0  05  C  0 


P  F  0  G  *  **  *•*  ^  *1 1  f  J 


-  c  = 

C  0 

£ 

~ 

C. 

4  P  L  T  5 

•4  r 

f  c  "  -  -  rJ 

CC  F 

T  .  F  f  i_  L 1  '.  T  *  1 

et 

IF 

Li 

\  2  ft 

n  O'  ^ 

t- 

r 

c  r 

C  I 

4  C  .  L  i 

t:*, 

r,  r  l  :  a 

•  *  4 

r 

<,'■•  u.s  t  ;  c  *  s  f 

r. 

r 

T4 

I  cc 

w  UC 

0  c 

c 

V  u 

~  L. 

12.2 

F 

Fill  15 

.1 

- 

1-24  2?  544 

2 

.  0C 

2 

c 

_■  • 

L. 

■;4V_ 

1  - 

M  12  LlLL 

r 

Y 

:  ic  c 

J 

£ 

m  r 

Cii 

‘4  I  C  A  L  ~ 

>*z  -  r  f  ,• 

c  P  £, 

c 

r  i-.f  ;m:.f  r, 

o 

» 

.h  L  in 

I 

1  T  4  T 

.11C 

~ 

J  \ 

:  j  z  9  o :  t  y  , 

IT  ILL- i 

t  r  4 

• 

j  2  L  •"•  H  0  '■  '  5  7  4 

L 

7- 

• 

■J  12 

c 

0 

c 

2  13 

c 

r 

c  •  •  * 

-  c.  3 

r. 

■.  I  .o 

C  p 

r.  2 : 4  t  z 

c  c 

c 

CT  I  Cl  •  *  -1 

i 

\  r, 

I\ 

J  'jf 

1  » 

CL  4  T 

0  14 

0 

o 

£ 

:  15 

r 

n 

c 

M 

iT 

4  l:  . 

.  *  — 

Zr:  2  Y 

m  r>" 

r 

l  i -.si ftii:  - 

Y 

.  i  = 

J 

- 

i-  ' 

Z.R  7  t 

•  T 

2,'.  <F 

L"  -■ 

4  4V  :  6  .  ) 

.  17 

c 

c 

c 

2 

r  r 

24  t ■-' ;; 

M 

uF  "  L  C  - 

M  *,  J 

r 

-l  [‘.or.c:=: 

G 

:  ic 

C  L 

* 

L. 

»  i 

;  L  4  ^  i 

T  Y 

•'F  TF<:. 

:  - 

T 

4  4L1  I*  T  (,  1 

.  19 

£ 

c 

- 

»L 

Z\~t  2 

t 

T 1  .<  1 1  7 

. '  * 

-  20  C 

J 

L» 

-21 

z 

c 

2 

i 

i’  i  L 

'14  Til 

L  L 

OTITIS 

z 

i*. rir-T~:  :i 

Th 

C 

p  h  e  -p 

M  U 

7  2 2 

c 

n 

c 

:  20 

c 

2 

c  *  *  * 

p  I  *.  c 

j-  _  ▼ 

r  -  -  r  ^  ^ 

* r  * 

*  *  CM  ‘  r  I  *. 

e 

Ch 

TC 

T I 

-  *  |  ft 

-  *2 4 

Li 

C 

c 

«  C  J 

U 

•o 

c 

C  2t> 

r 

o 

•* 

<j 

~  ft  ft  ft 

*  •  •  • 

•  * 

•  •  • 

•  *  * 

« 

« 

ft  ft 

ft  ft 

ft  ft 

ft  ft  ft  ft 

0  27 

- 

:  -  ■•  =■ 

TT  4 

44  -  L  I  v 

i  *  *  ** 

4 

T  C 

-  2c 

L 

c 

c 

w  2r 

r 

1  I 

VI 

'.Cl./ 

-1 

.  V.  t  .  )  , 

r*  L  . 

1/ 

(  '  )  4  H  r.  w  ft  <  7  )  ♦ 

hi: 

-  ( 

5),-f 

IT  <  5  >  , 

,  0C 

•./ 

L 

-  ,,  r 

> 

( - ) .  - 

( ••> ,  -,r  ■ 

(  ■ 

) 

•  r  £2  L  (  9  )  .1/4', 

L 

(  7 

)  9 

S  .1  l 

i ) 

ft 

.  oi 

J 

•  -•: 

*  * 

4<  )  , 

:l<  > . - 

r"  " 

(■•),>£::  v  ( v ) 

9 

h-r 

'  •“ 

'/ft  (  "  )  ft 

-  02 

r 

LI 

;  4  l 

w  _ 

4(  r)  , 

( '  L  ^ 

‘  r  (  )if 

r.  -/  c 

c 

l(  4) . p£  :■:  j;  ( 

; 

i 

.05 

»/ 

w 

1 

.•  L 

\Z,  i.  w  . 

v  z 

»r c  <: o  > 

.  C  T 

.  l  (  i  :  > 

:  04 

c 

r 

*“  ^ 

v 

-  5o 

L> 

:  /  . 

'j  L 

L/--1 

f  4  l>  r.  *J  ^  t 

^  2  C 

<r:>,  hm.. 

^  P  zn 

. « 4  >•  j , : 

'.  <1 

^  (4- 

'  1  ^ 

2 

</«;-. 

L/  :;l.  2 

.•■  j 

,  1  2  r.  r  V  , 

•..  f  r 

'2 

,:v.4',/<_4) ,  - 

Y 

p : 

4  < 

t  h  )  ft  e 

'  C 

■J  <  2  4 

;■  0  7 

r 

ft 

i  / 

v  i 

1/411 

«**  ' 

iH 

^  '  r 

A 

•  i; 

i 

v 

.  /  ^ 

■ — 

4  /  4  --- ; 

C  ~  *•' 

.is  , 

.4  F 

- 

9  -  C  (  *•  r  9  2  *•  )  •  - 

V  (  4 

*  9 

: 4)  ,i 

►  >4 

IF  ,  J 

-  i  ? 

c 

c 

•  /  T 

•_  . 

/  4  1  ■.  J 

*«  o  r.  *  <  «  ^ 

=  •  A 

.  4  0 

i 

T  /  T 

r 

_  i 

C  -  L 

•  •«  -  *«  *■  -  * 

•v"  r 

: 

I  4  1 

z 

•J 

'.  /  J 

U  ••. 

/.(.-_ 

♦  r  •* 

)  1  V  (  4  4  , 

-  4  ) 

t 

.  (  4  ,  2  4  )  .  4  <  4 

- 

9  «- 

-) 

.  FP<4 

'  ft 

2  4), 

:  42 

L. 

:  T  r 

( - 

- , .  -  ) 

» ■- 

(  4r  , 2  4  ) 

*  w  7 

c 

M  44,24  >  ,  YC  7 

L 

*.  i 

r 

l.Ml 

C  T 

.  4  L  1 

„  4  l 

L 

w 

:  v  _ 

T  ^ 

=  (  4.  , 

t-  4  ) 

,  J  S  T  4  =  < 

4,  -  f 

c 

4>  .  .  '  T  4  ■'  (  h  :  . 

-  > 

,i- 

2  T  4  :  ( 

H  - 

,  24  1 

l  a  i« 

2 

;  ’  - 

^  r 

-  *  (•*. 

t  4.  ** 

>, TO  Ttl 

"  (  4 

- 

. 4  )  ,  j  I  C  T  -  f 

U 

'  ft 

) 

__***“ 

2 

■J 

.  / 1 

Li. 

/:  T.o 

T  » ’. 

I  f  r4  j  •  *«.  i 

1  • 

••  i .  f  4 •:  4  ’ ,  j 

M 

'  ( 

)  ,  J  '  4 

»  C 

1(4- 

{ 

y. 

:  /<- 

L  .y 

■•  / .  . 

w  ”  _ 

%  A  <  **  )  t 

r  <  _ 

- 

)  ,  '  .  £  F  (  4  -  )  ,  . 

/ 

r 

i  *• 

-  > ,  r 

(  24  ) 

:  4  r 

2 

r 

: 

V>  <  ..  <• 

)  *  -/ 

;  ..  C  •  )  ♦ 

■*  ^  f 

>4 

)  ,  t  ;  i  2  -  >  ,  4  ( 

H  ) 

9  ” 

1  1  2  4  ) 

ft 

'  -* 

L 

r. 

. 

r  (  .  4 

) .  . 

f  ;  <  »  > , 

..  C  * 

< 

ft 

- 

r 

i  "■ 

4  )  .  •  . 

'  ( 

*  "  )  9 

,  -  i 

L 

:  y  \ 

.  1 

2  4  )  ,  r 

>' '  ' 

U  4  ) 

„  ’j  C 

_ 

C  G 

V  ».* 

r»  *. 

-  1 

„ 

w 

■  /F 

1 

r  -  /  .  - 

z  .  I 

1 1  V  i  c  c  .* 

-  »  - 

■ :  :t,fs;,-.-t. 

r 

(  u 

:  ,24) 

,4' 

i  C  (  <• 

j  ^ 

'  /  ' 

- 

-1  7  1/ 

1  * 

. T  r :  •. ,  r 

l 

f i '  v : i,4 l 4 r 

- 

9 

-  i 

c 

1  '*  _ 

lLi  '. 

u  .  « 

J 

C  T  r  9  i  j  T  »  J 

L 

T  4 

.  9 

J  IT  1 

.1 

:  tp  i 

7  *4 

C 

j 

./  T 

/ .  ‘ k 

( ^  • 

•  r  *  )  *  c  c 

.  2  v 

l. 

i C1.C2»C43?2 

9 

t  L 

.( 

ft  “*  t-  w 

ft  *" 

-  T  £ 

•,  c - 

r 

r  /  * 

L  (_ 

LF/  il  L.l 

:.<  4  )  ,  < 

4  LI 

«(24),T4l‘.  <4 

- 

)  . 

t  : 

j«c  4 

) 

1'  b  *j 

C 

c 

:  /: 

c r 

F  /  -  4  ( 

"  f 

24  )  ,  i’.{ 

44  , 

e 

4  )  ,  41 (  4  4 ,24  ) 

9 

«  r 

l  4 

4,2-  ) 

,  i 

ft  (  H 

.5  t 

3 

J 

:  A 

(  *• 

*!  *  t  -  > 

2  v  " 

L 

:  /- 

L. 

tt / .: 

TL  . 

2>JL  . 

t  r 

r 

C . YSLFL  T  (  1  .  , 

*4 

-  ) 

,  > 

.  1 F  _  T 

\  <* 

>  ,  1 

-  zh 

0 

r 

l  : 

'}  I 

;  ■••  l  : 

\  ~  - 

L . *  ’  VC  4 

L  V  . 

t 

* .  C  *•  L  ft»  9  *  .  C  «  L  ' 

ft 

i 

r  P 

-  . ;  ■  r 

4L 

ft  I  . 

j  nj 

r 

j 

2  1. 

c  - 

L<-  u  . 

:-u 

'  ll  ,  C  -  w 

-  ♦  1 

*4 

f*  L  vj T  i  w.  t  I  T-  * 

0  . 

.  i 

M  ,  I  -  -I 

-  r 

ft  i  :.L 

-O  1 

C 

j 

■  I '. 

I  r 

*•  L  •  * 

I  *  L 

- ;^.v.v,v.v,v 'w '■^0'^ ■v’.' v^.v.v  -»\-\ -*,•*.  w<. A -'.  -■.  -\  A -r.  •■. V\‘W'  •' 

■/a^a'-oV-'/^v^^V.vV 

-W*  •  -  *  *  >^>*  -  V  A.  •  .  *,  ■/  *.*  >  V  v  */  *  V  A*  --  /%»'/  V  V  V \v/  .' 


ww 


J  62  0  0 
3  63  0  O 

j  b-»  c  u 

J  bo  u  J 
3  6b  C  U 
.  G  7  L  v> 

-  b  r.  c  u 

1  6  i  0  0 
.  7u  C  2 

:  /  i  :  c 

72  L  J 
3  73  3  C 
.  7<t  C  C 
.  It„c 
J  7  6  l  3 
.  77 ; ; 
7-, :  o 
? »  l  : 

■a». 

.rit: 

«  7s  ^  ^  J 


.  -b  3  C 
.  c7  C  j 

=  n  C  ; 


L5i‘,M%  OF  IM£CTC~  OrCTIOO  ..  Pf  o  I  'A?/,  Of  lOOOPTO:  COOTK', 

Co'^MJN  /rscPO/  «i>PoW,  \PCcT, 

'  :  =  pOEf.(ic)»  oppciido),  :  =  fowT<ic),  r- cp  >":  <  1 :  > , 

>:i;.irno)i  y;in;t<ic>,  toi.iti::),  w:r.  it  ho,  i  i  j 

a  b  I  in  )  i  Y  t-  ( *+  -  )  , 

lj(*+  *  ,  •*  )  t  0  { **  •*  ,  2  -■* )  ,  ^OOLO(4r*  2  h  )  ,  ViOL.  1  i  .  -  )  f 

:  -00,  3  -  7.  V  X ,  r-=<AVY,  *  2?,  ’rOMO,  7  I  .  1.0,  it  ,  jOAO, 

a  0  3  L  -  »  y  _  JL  0  ,  7"  j  i —  «  _  0  C  »  0  *  ,0300, 

a  0  *,  £n,  y  0  \  Em  TO1,  E  a  i  w  0  0  F  «  ,  7  0 0  a  , 

.  t  ,  o  t  :\c ,  o  t"  e~,  , 

iOTLFO,  I  \  T  C  T  5  t  IrLi"./,  I  -  I  T  .  -AaSTP,  I  .  T  *  .  ♦ 

t  I  w  ,  ulC  ,  iJt  JV  ,  ,J  U  ,  I  r  ,  or,  i  0*  G  L  -  ,  .J  ■  \  i  L  -  ,  I  -  . T  t 

■  . o i o r ,  "r  3 :r ,  jO'-’ix  (4;  > ,  -.o;,  \:  j 

c  w  y*  w  ,  /  w  j," /' "  ~  •■'  v  ( ;  ? ,  o : ) ,  =  •  c v .  i  o.  u ,  o  c  > 

\:  c  ofotig-.  *•  [  :-•  ioofptf*  o-otic:,  *•• 

j7  l*.  (wO  i  T  -  i  ,  Ob  ,  i  C  i  - 1  _  X  !  *  ,rIwb  =  ,_  ui  u  1  ,  J  «  T  *  »  0  T  “TwS  -  1  Jl.  *  ) 

iLw  "  L  I  v  I  'i  A  r-  Y  -Of1-  I.  F'wTO  -  -  r  LoCATf'  rf  ;r ,  . . •  i  •  i 

.-U  7-*:  -  3-*,  7  t.  •/, 

t_  •t,t,A.,l«r,l,7r,c*A7 

£if:  x  -  ■  I .  /  •  A  :  •  / 

0  -  T  -  Y  a  r  "  1 2  “  CO  *  J  — •  .0,3'-  0‘*,,i  -  r  ,  I  h  "  r ,  :'H  IT, 
or  .  n »  2  n  £  7,0't  ,:t£r  ••/ 

.iT.  0Y'-"l  /I  r.  ,  £-;  ,  J  >  u  ,  ,1-.  ,  £  ~  £  ,  £  Hf  ,  .-7,  1H-  ,1  »r/ 

■  • :  cc  i  *l  .  •too  :.oc ; ,  c«Ll  t-.-o  ,nP,  r  "■  xiT-i 

, :  ,<*c ;  o ) 

■  s.Trw  .  r.t»  -  0  tsr^ML  Jt  ;  LI',-:  f-OlOT"? 

-L0  ;  . 

CN  OiTo 


onlls: 

F ,  r  „  r  , 


38? 


I  -•»  C  3 
1  "3  GO 
1  lb  C  C 
1-700 
1  3  b 
i  =7 ;  - 
i  ?: ;  c 
i  •  l : : 

1-2:0 

1  >5  C  0 
1  m  : : 
1  -5  c  0 

1  7b  U  0 

;  wt; 


_  x  z  -  l  1  :  *  /  .  ■-  "r « 

X  (  1  )  :  -  0  .  I  •  „  X 

X  (t  )  =  -<l  1  > 

:o  17:  1^7, mm 
»(:>  =  <(  :-i >  •*"* 

2  * : b  P : X •  -  A 

*  (  \  I  j  =  x  <  M"  1  >  ♦  1  »  I  \  1  w  1  )  -  «  <  M  -  t  )  » 

'0  1 : :  ^ 1  «i: 

il)=x(l-u*(x( 

•.  1  =  i  b 

M  v  1  =  M  -1 

iLrjr  =  <*c.  ;•'!)**{  .1))/:.: 

-  l  1  =  : .  t  *  (  x  ( : :  I  e:  .  a  <  : :  t  •  1 ) ) 

**  l.  *.  :  -L  T  ,T-M  , 

^  c :  ^  x  :;lu:  r 

« ill  f  ric  ■  i  - 1 :  w 
: :  t  ;  ■. .  - 
v  1 t 3  .  =  l » : : 

w  -  A  (  I  )  :  o  .  1  ■  ' 

?  1  (  : ) :  ^  -«<:)»: 
t 

0  1  c  u  t  :  1  1  ,  •  i 

w  -  A  (I  )  :  .  : 

•A  i  ,  C  1  (  ;  )  ;  _ 


:c’ 


:u:: 
2 1:  c : 


:  io  c : 
m/:  : 
:  1  a  : : 
:  1 7 : 0 


_  2* :  f 

.  2-. : : 


2  <•:  c : 
.  “i  0 : 


7>- 

r.  <■-: 


1 • 


.  •  ( 1  (  T-  -  >  ♦ v  ( 


-  .  -  -  L  -  r  •  ~  • 

r  L-  .  -  •  •  '.jr-T  1'.. 

T  .  f  .  '.'j  T  - T  ' 


mrnmmzmmmmMmmmmmm 


swsv.  ‘X‘W!v 


3  67  CO 
5  63  0  0 
5  69  0  0 
5  70  C  0 
5  7100 
5  72  0  0 
5  75  0  0 
5  7*  l.0 
5  75  CO 
5  76  0  0 
5  7  7  CO 

*  7=;  c  0 

5  79  0  . 
5  -c ;  o 
5  1 1  C  0 


«  _  5  -  - 

I  '6.  '  ' 

•  *  J  w  v 

5  -6  Oi  0 
5-7,0 
5  re  C  0 


5  -10  CO 
5  -»1  0  0 


5  >2  0  0 
5  3  5  C  0 
5  7“  C  0 
5  95;  0  - 
5  >b  0  C 
5  9  7  0  0 

5  i:c; 
5  99  C  0 
>*  00  0  0 
-oi  :  o 
-  12 ;  j 

-,500 


-  06  0  . 
-  .  7  ;  j 


-  1-  .  - 

- 1  -  o : 

-  Is  0  0 

-  1  7  ■  . 
-  1  -  0  . 
-  I  3  0  0 


-2-00 
-2500 
-  26  0  0 
-  2  7  0  0 


-b  i te  » i  ♦>  *~f.: 

1 7  :o\t  inoe 

1F(.\0T. I^LAO)  00  T,  0‘ 

st:.  (i2i<  i  j 


=  e  40  <  i : « • )  j 
3  c  io  ( i ;  *  *  >  « 

-  •  A.  (  1  «.  i  *  )  -> 

-  E  4  0  (  1  0  ,  •  )  T  : 

-  E  4  .  (  1  0  t  •  )  r  0 

-ri:u2.*)  j  :  : 

-  i  A-  ( 1,  I  •  )  :  If'. 

:  o  \  t  :  \  _  e 

lr(.‘.  IT.  r.  I’5L) 

; r  ( :  4l  - )  o -li  7  = 
:  -  < » \c  4. .  >  oi,.  -3 
ic  i  >  :  4,l  >  - 

:r  ( :  4Lr )  -  :ll  = 

ic  >  ;:L.  j  = 

:  o  \  t 


.  <  i  . 
.  ’  (  :  . 
•  .7 , :  . 
-.715, 

.  r  <  : , 


In  it  i  il  i.'i-  -  ■•* . 

. .  i  ;  =  i  *  •. : 

"  10.  .  =  : »  • 
1  ,  -  )  4 


•  •  ’  I  \  ,r 


0  .nip  I''"  :cs  I.'-JS-  c.ilc.t 


:  rH  „  *  • ' 


fro  *  t  tfr* 


'  (  •  (  .  -  - ) 


i  '  j  *r  3T  "Ir, 


i ,  •  »  *•  •  < 1 


✓  / 


>>  .*  // 


s  so  c  c 

:c 

(  * 

fG'AC 

•  L  T  .  .  1  E  -  -  >  _  0  p  E  :  ;  .  -  t 

-  i  l  0  c 

4  *  „  L  C 

%r 

1‘«ll 

■  s;  c  c 

wf 

.GATE  - 

-l%  :•  pf  ■. .  t*<r 

s  s  J  O  0 

ip 

( i 

\:  it  > 

-'all  :At.  . 

*•  S*  »  0 

»  c 

( ; 

.:  -  l  j  ) 

'ALL  '  AL  :  J 

.  ‘-3  C  G 

4  * 

<  * 

'•C  -  L  A  ) 

•  "U  _  «  w  -  ^ 

Sb  .  G 

;  - 

1 1 

- -Ll  ' AL 

‘  S?  LO 

Ic 

{ i 

'  all  :  i  l  ; T  r 

-  ;  u 

1 : 

< ; 

■.:  al : ) 

:  -ll  -A  l  :  r  ^ 

r.i:: 

;  .  A  !  •_ 

fbvK  ; 

-  b  j  C  G 

» p 

<  I 

SP-.  ) 

.  -ll  *  -  ~  ^ : 

-.*.130 

t  « 

t  ■  -  ■■*  ■: 

i  - T  r  -  ^ 1  - T 

-  W  .  J 

z ' 

m  M  ; 

*  ZLk‘  /»  L  ml‘. 

oi  j  G 

"  * 

*•  W  -  - 

V^  .  4  . 

b*  i.  j 

-  • 

.# . 

"  J  - 

>  -  /  *  **;•. ; , 

c*  G  J 

- 

“  *  - 

- *./ * u:  . i •. 

bb  „  j 

-  • 

-  *  ; 

'  ’■  */1.’.»^L'-!'i«  Mi'  i‘  ».*>(  i 

*> 

) 

b?  .  c 

;  i 

. 

i  f  v  •  \ 

J  1  l»-<  T  J-* 

O'  C  k 

-  1  T  •  ' 

oS  G  j 

m  - 

i  * 

- 1  .  * : 

>  ‘  I  ?  -  •  - r -  -  »-'  . •  .  ♦  - »  .  : 

*  t 

..  r  • 

■•'  .  A  C 

?„  ;  . 

t  -  r 

z,i  %  (  . 

•  \> * . i  :v  \f  .«i  :  v 

L 

«  » 

J*C 

*.) 

.P  (  I 

mg: 

i  _ 

; 

V 

;  ) 

M  r : 

.  - 

.  , 

-  »  •  k  i  i 

*  • 

i  1  • 

.  M  .  G 

: 

*. '  ~  _  ) 

“Ll  *  -  *  .  *  t  I  •  1  i  .  !  »  N* » ■  •  i  *  »  J  7 

• 

i  w 

•  r  % 

,  « 

►r  ■  - 

/-  .  . 

i  ; 

. 

*-  -•  ^  .  t 

-L-  •i.’ii1:.1;l(JtiT,/ 

• 

#  t 

'  *  • 

J  t 

nt  .  v 

fG  -  v 

.  w  *  «•  t 

-  ---  r 

• 

*  i 

Y  •« 

« ^ 

*  _  w  ) 

’*>  '  3 

1  * 

» 

. ~  ;  » 

---  •  ■ :  ••  ’ » .  i r ,  „  ' 

« 

'  « 

V ,( 

•  ^ 

L  *  •  ) 

ollOC 

IP  (  1  NC  At  44  ) 

c  al^ 

6i2aa 

IP  <I\CALP) 

c  all 

6  13  00 

ir( INCALP) 

call 

b  1*  o  c 

:p (  INC  A L X ) 

call 

0  15  CC 

IP  (  I  *vC  Al  2  ) 

cal. 

6  lt>  C  3 

IP  <  I  *.  C  A  L  3  1 

call 

b  17  C  0 

ic  (i  -vCal:  > 

call 

b  It-  C  G 

:f(.‘.:t.  *. 

C'jCI** 

0I1CC 

1^(1  *<C  ALw  ) 

c  all 

b  2  0  C  0 

I  P  <  1  \C  A  L  V  ) 

c  all 

b  2 1  ?  C 

:c  < :\c  al- > 

call 

0  22  c : 

I  P  (  i  4C  Al  2  ) 

C 

c  2  3  L  : 

:r  <  i  alp  » 

c  all 

b  2  <4  0 : 

IP ( 1 \Z al-  ) 

c  all 

bit  C'1 

I  p  1  4  32  a l x  ) 

L.  Ml. 

--  2  b  G  G 

Ir  (  I  V2  -  L  <  > 

C  al. 

b  27  C  C 

7 r  : 

4  *4  wC 

b2A  •; : 

: 

A=  I’P 

-.2oo: 

4,"  1  t  <  1  i , . 

)  > 

b  :  a 

*• 

)  V 

b31  C  j 

44-iTL<ll4* 

)  #1 

hi*  :  0 

-  p : T  -:  ( 1 1 ,  • 

)  p 

b  2  3  G  . 

-  -  I T  •:  (  1 ; ,  . 

)  rt 

K  lH  - 

>  ■: 

b  it :  . 

i T :  <  1 1 4  • 

)  ;  I r 

©  *0  J  c 

» = : T  <  i ;  4  • 

)  : tp 

4.  - 1  t  -2  ( 1 : ,  • 

)  YC  T 

7 ;  t 

.  :-.t 

-  ivn 

;al  :.i_ati 

:  \  .  ► 

o^jCl 

/v  ~ ; r  r  (  « *♦ . 

;  > 

r. » 1 „ : 

-2  < ;  1  .  =  t 

4 :  -'i 

-> * ;  '  c 

A-  .  (  T  A 

t  I  i 

b  -*  *  j  C 

<**■  I  7  1  (  !*  #  *•  . 

.<)  : . 

b4»  j 

*•  .  1 

.4  *  •  -  ' 

tt;  l  4 

»  "  i  '  t  .  4  !  i 

_  ) 

•a  **©  ;  v 

;  --- - 

alt  I v : 

4  .  l  C  \ 

b  *  7  -.  c 

_  A  -  •  z 

->  **  :  c 

; r  <  :  >  _  * 

•  “  • 

S  7  , 

k  -  >i  .1  c.  * 

4  Y  A 

►  >  5  -  w 

w  A.  .  •_  z  ; 

fc  -  1  0 

•  4  .  ■ 

b^«r  .  : 

.  .4  L  ’ 

4  .  4  Y  A 

f  b 

f  f 

r  :  AL 

•  'j-  c : 

I  r  «  L  ”  .  • 

.  L c  C 

,  tL  -  ••' 

'  J  A  A  - 

u  ‘  -  L  r  *  1 

'.  '.0  4.  . 

'  »  , 

T  -  • 

* 

‘  ^  j 

t  ■  ~  i  ’•  ■  ~  •  1 

r:  ~'i 

*4  -4 

’  - 

:  -  (  l  p '  .  ■  ■ 

.  2 ) 

A  t»  w  „  ' 

;‘i  •,  . 

.  i 

••  bl 

0  ,  -  •  • 

A  '  ( 

©  -  .  ; 

..  •  .  A  . 

•  J 

f  b  *  .  ^ 

-  * 

<•  f  »  4  .  )  -  «  , 

’  •  **  < 

b  ■*  -  ~ 

-  •  - 

•  b~. 

-  * 

m  i 

.  c  . ;  . 

r  S*>  ;  0 

:  -  -  - 

»  -j 

■  bT  - . 

«  (  1  4  j  * 

br 

-  - 

v  .  ^  6  •  -  • 

b  “>  .  w 

*  r.  '  l- 

. 

71  .  . 

d  '>  '  ,  *  . 

P  3  I '« T  (  i  »  1 
PPINT(1,1 
P « I  NT  4  1  ,  1 
p  » I  %  T  ( i ,  i 
p  »  I  %  T  (  x  ,  1 
r  R  I  ’*  T  <  1  , 1 
P=I-.T(1  ,1 

>  30  TO  lb 

P  P  I  '•  T  4  1,1 
PP  IM  <  1  ,  1 
p  p : t  ( i ,  i 
PPI‘.T(  1  ,1 
p3:*.Tii  ,i 
rt :  «r< i  ,i 
sol‘.Ub,2 
F'M'.TI  1,1 


•  f*  I  4  \  J  4  I  T  ,  J  T  «  X  •  Y  ,  'J  ,  n  C  C  W  ) 

•  M  *\Ji  IT  .  uT  .x.  T,P,h.E;P  ) 

*NI«No#IT,jT  ,  X  «  T  ,PP,HPO  F) 

I  ,  N  J  ,  IT  ,  jT  ,  a  ,  Y  ,  T  f  ,  h  F  0  K  ) 

,>4*  »  V  J ,  IT  ,  j  T  ,  x,Y  ,  E  . ,  t-  E  .  3 ) 

,\I,3j,IT  ,oT,aL,Y,LTFM,hE2'~w) 

•  M  »  NS  TL'*  ♦  I  T  ,«T  ,  xt  ,3  T  V  A  l  4  TO  T  l  -N  ,  rt  E  Z  ''  L  ) 

,  3  1  ,  \  o  ,  IT  ,  j)  ,  X  L  ^  C  4  V'J  u  ,  ul;  T  #  X  E  _  0  .  ) 

4 1  4^J.  IT  ,  j  T  ,X*.C  ,Y'/*|P,  VST  4=  .-E'C  V  > 

«M  «\  J,  IT  ,  J  T  4XPC  ,V\C  «WST4P  ."P  rr  «) 
i  *4  4  ♦  $  T  .  M  ,  I  T  *  JT  ,  XL  2  J  4  3  T  V  A  l  4YSTL‘J34"iEIi 
,  "1,30,  I  T  ,  J  T  «  X  f. .  ,  Y  \  C  ,PSTAP,M^r3P) 

.M  .  “«Jt  IT,  JT  **M,  Y-,0  .TESTAP  ♦  ->E  'Ox  ) 

,‘-I  ffyJt  Ir,  JT  ,x,Y  ,  C  P ,  PEEL) 

4  2 1  i  ’<  j  t  IT,  jT  ,  x*4  0  ,  Y  4  y  IST«-|«HErjV£) 


ic  ic  all  l a f 3 r  :  t  -all 


.  i  \  •  -  r.  > 


:  •» c  *. l  :  >  :all  °l:t< 
E  2  4  -  Y  *  ■  C  L  «  L  a  A  &  i  ) 


32;  l  t  ,  l  ■ .  j  f  ;t  a  .3 ' 

'  A  a  l  '  T  ,  . 


;  T  r  T  r  .  «  A  .  i  <■  ,  r$L  rL  T  4 


,  2  p  T  ' , «  a  . ; ; 


•  «  L  c  ’->)•.!  ' 


,  *  i  .  */.<■; 


TV" 


■■WW 


V.N 


o  72  0  0 
6  73  00 
o  74  0  0 
o  75  0  0 
6  7b  0  C 
6  7700 
b  78  CO 
b  79  0  0 
6  6000 
60100 
b9200 
bo3  0  0 
6  94  0  0 
6  05  0  0 
6  9b  GO 
bb7  00 
o  96  0  0 
b  69  C  0 
b90  CO 
=  9100 
b92  0  0 
b  93  0  0 
694  0  0 
=  9500 
o  9b  C  0 
b  97  C  0 

6  9ft  C  3 
b  99  0  a 

7  00  C  0 
701  CO 
7  02  0  0 
7  03  CO 

7  04  0  0 

7  05  0  0 
706  0  0 
7  0  7  C  0 
704  0  0 


mNG9G^  —  0.0 

«f*0MN  =  0.0 

r -  4EA2  INITIAL  5UC0S  Of  \E<T  3  „  I  ft  L  PftOALE"  F  -  0 ' 

C -  PREVIOUS  SOL N •  Gr  similar  PAJ0kE“ 

IF (.NOT.  I A  C  AO  I  GO  TC  445 
=£AQ<12,*)  „ 

ft£ AS (12, *  >  V 
ft£ AS  < 12, •  )  . 

6 £ A  ;  1 1 2 , . »  P 
=  £AS  (12*  »  )  TE 
0  £  AS  ( 1  2  ,  *  )  AS 
ft  £  A„  ( 1 2  ,  •  )  STFN 
■*45  COM  INol 

,  -  = 


SO  490  u=2»JST£F 

A  «?£',=  0.5  •  (  SEU  1  ,  J  >*  ~£N(  2  ,  J>)  •  '  2  V< 
*  t*O.N  lr,=  *«o,I  \*  af  S£  .«  -  (  2  ,  o  )  •  =  t  2  ,  =) 


)  • 


(  j) 


.  ( 2  I  j  )  •  .(1  *  J  )  *  a  ( 

,  J ) 


*,  0  ‘ 


i\s«m  os: 

A\GN0.viAN  =  2E 

ABSENTrA-?"'  T  ♦  A  <•’  2  £  \ 

FlO.  1N  =  FLv»*'.»A'S£'««.( 

=  *'£AN  =  FLC«iI‘.  /  ABSENT 

S«3L  N3  =  A  N  G«i  «/(  COM  *<•  4  S4  Au.  ) 

I  3  (  „  ( 1  ,  JS  T-'P  )  .EG.  O.C)  mvC.  IN  =  l.u 
•  ft  I  TEt  2  ,  i  K  >  1  VC  . 

:•  O  to  3.3 
CC'M  1W 

LGI'.'.ru  OF  1..S-,  ;TE.  SECT  I U-. 

IF  .eg.  C)  Inf, 

Li  solut  ior  not  r>"]j  irfn, 

S  T  WF 
E  N  .  I  F 

'f  tss  I  il  T  ,)S  vf  l3C  it  i  l‘5  . 

: ;  2  s  :  :  =  1 .  m 

-  0  *.  N  C  J  =  i,  N  J 

I ,  -  u  O ,  I ,  o> 


I N  S  £  c  T  i 


:  t  i , 


7  09  0  0 

v-  l  (  1  ,  o )  -  V  S l  I ,  0  7 

7  1C  C  C 

.  < : ,  j  >  =  o  ( i  *  j  > 

/nee 

»  t  (  I  ,  o)  -  ,  (  i  ,  w  ) 

7  12  C  3 

2  -.30 

lo.rr.a 

71300 

714  C  j 

'*■ 

A.jssi  n  •••'•'"'U  inn  3vCvV. 

7  la  :  3 

.  w  .  = . .  ;  -  1 ,  m 

7  16  C  3 

-  -  ■  ■<  =  -  i,  < j 

7  17  0  0 

-  I  *  V,  >  :  ; 

71-3  3 

a  ,  j  >  =  s . : 

7  19  0  0 

fc  t.  1  ? 

*  T  f  ■  . 

W  V  •  1  i  •  ^  ^ 

723  C  0 

z 

Sf  t  tiif  l  u^i  ;  phoic  solution. 

72130 

2  A  =L  _■  /i 

7  2t  0  C 

I  r  (  I  r  L  A  "  2  .NS.  1  ) 

7  25  0  C 

Iff  s  /  st  f’  *oS  not  t;nvtr  j‘i;  ,  L  rail/  s  i.  it  nrutt  ijain. 

7  24  C  0 

IF  <  I  "  S  P  S  .  G  T  .  'AtCT  1  T  n£  N 

7  25  C  0 

I  ’■  <e,  •)  *  SLofal  con.tr  jfncf  rot  jCnltvfJ 

72b  CO 

« 

'.iftrr  13  it  »r-it  ions  for  rnth  prase,.’ 

727  C  0 

u  *  - 

7  26  OC 

r  n_  ;  f 

7  25  0  0 

NSTLN  :  11 

7  30  C  0 

•.PTuN  -  n 

7  51  C  C 

V-  <  =  1  u 

7  52  0  0 

NIT'-  --  u 

15 . 54 


* 

3 


■j 

'J 

H 

w 

a 

1 


7  36  a  0 

LP 

7  37  C  0 

NS 

73o  C  0 

M  A 

7  39  3  0 

GO 

7  4  0  0  0 

ELEE 

74130 

- 

S/ 

7»ICC 

•n I TE( 

743  0  0 

b*  ^  I  T  ^  |  i 

744  00 

Ir  <  I  NC 

745  3  0 

i c  ( :  nc 

74b  C  0 

I  p ( 1 NC 

7  47  J  0 

IF < I NC 

7  4c  0  0 

ic  ( i  n: 

749  3  3 

:c ( ine 

750  3  0 

IP(  A  NC 

751  GC 

IP  (  I  NC 

752  0  0 

Ic  (  1  NC 

7 1»3  C  Q 

IF  (  .  NC 

7  54  C  0 

IF  (  I  NC 

7  55  0  0 

;p  <  i  nc 

75b  0  C 

:r  < :  n: 

75  7  3  0 

IP  (  I  NC 

7 5e  OC 

Ic  <  I  NC 

7  59  C  0 

Ic  < INC 

76C  C  C 

le  ( .NC . 

7ol  C  C 

IP (INC 

7b2  00 

2  75  : 

;  -nt 

7  63  C  0 

ST  "P 

7  64  0  0 

E  -.31' 

7  b5  L  0 

r 

7  66  0  0 

2  •  •  • 

r  \  2  ^  p 

7  67  3  0 

"* 

7  be  0  G 

.  T  .  3 

7  69  C  0 

c - 

P  0  4  v  A 

T  70  0  0 

3  I  1 

P  -  -  '•  R  T 

7  71  3  3 

!rLC.P; 

7  72  CO 

1  P  S 4  Tn 

7  73  0  0 

I «  7CE L  ’ 

7  74  CC 

- '  C 

c  A  - 

c  j  ;  v  i  ; 

7  75  0  0 

.  30 

c  "•  c  v  •  r 

7  7o  0  0 

*5  »  ^ 

F  4  4  A  T 

7  7  7  C  0 

:  *• : 

p :  -  v  i  r 

’  70  0  C 

e  ~  w  v  i  y 

7  79  : 0 

;  f  " 

7  jl  o  l 

«.  ~  o 

r  C  0  v  A  T 

7=133 

2 (  Z 

p .  4  ••  r  r 

7  R2  3  3 

T  ^ 

-Aw 

c  ^  :  v  ;  t 

7  6  3  C  3 

il In--- 

7  4  4  0  3 

1  2  .  t  =  > 

7  45  03 

i  *  T  * :  \  * 

7  4b  0  o 

31  1 

fc.' -r 

7  4  7  CO 

»  •  ' 

p  .  4  v  A  T 

y  *  e  0  0 

4^2 

p  34 '■•AT 

740  3  3 

*♦12 

c  *av;T 

790  c : 

4  1  . 

F  ^  V  AT 

?  91  U  C 

t 

7  92  0C 

TblH  :s; 

7  u  o 

; ,  p  i  ; .  t  - 

NITER 

NITER 


■R  =  0 
liT  p  NITER 
'a  >.  C  3  0 


■r  jerce  jcM  evf  t. 


>  Lf  .t'ILf 

CALL  PRINT(1.1.NI. 
CALL  3  C!NT(  1  . l.NI, 
C  iLw  PRINT!  1  1 1  i'll  i 
CALL  P-  I  -.T  ,  1  .1  ,NI  . 
CALL  PC  I  NT<  1  .1  .NI, 

:  all  p  =  :*.t<  i . i  ,m , 
cal-  =>Ri.,T(  1, ;  ,\1 , 

C-LL  °R  I’.T  i  >  .  1  ,M  . 
,)  CALL  p=:nt( 1 
,cn::w>  30  t;  3753 


_L  L  3  R  I  N  T  i  ’ 
ALL  PCINT(1 

::m)  so  tc 

ALL  PRir.TII 
ALL  PRINT  Cl 
RLL  ?  =  I-.T  (  1 
~L.  3  R  I  N  T  <  1 


,AL_  P  c  l  T  (  1 


•  1  « \  I  * 

*  1  *  N 1  * 

,M  . 
.1 .NI . 
.  3  .  N  ’  . 
.l.NI. 


3  I  ,  W  A  N  t-  i  L F  E  x  ,  S «=  LN  0 « “  E 
'J  j  .  I  T  *  J  T  i  aL  i  —  ) 

\j.ruT,*1YCli/,rrj) 

N  J ,  IT  .uT.A.Y, W«r,E3a) 
Nj.IT  ,  j  I,  X,  Y  ,P,MCr  ) 
N-.It.-T,a»Y,PF,  HE  P  ) 

N  J  .  1T.  j  T  .  X  »  Y  .TE.  R*E  3  6) 
Nj.IT.uT  »A«Y,:._,rlE33) 

N  J  .  I  T  .  J  T  «  XL  •  Y  .  3  T  F\  .  ME  3  C 
NCTlN,  I  T  ,  oT  .AiJ.ETURL.YC 

Nj.  IT  .  j  T  «  A  L  N  J  .  YN  3.  L  S  T  R  = 
NJ . I T  . J  T  ,  aVE  . YUN3,  UST4  s 
NJ.  I T , j  T  ,  ANO  ,  YN3  ,«E  T4»  , 
N  3  T  _  N  »  i  T  .jT  .  XL  ‘tj  .ST  c  . 
NJ.IT ,  -  t.ane.yn; . 3  S  T  4  R . 
No.  IT  .uT.a‘  "'.YN3  .TESTA- 
'.J.  3T.  j  T  .A.  Y.ER,  rE'L) 

No  .  I  T  ,  j  T  .  a  NT  .  Y  t.Z  ,  W  1ST  i- 


R  ) 

T  _  \  «  r!  E 

.  i  E  3  3  .  ) 

•  ~  E  .  3  u  > 

—  -  ~  c  * ) 
y  3  T  L  N  3  » - 
h  •:  3  3  3  ) 

.  r  r "  3  a  ) 


inee-te:  section  •  < 


3  P  r.  EE=  TEC  EEC  Tl CN  •  •  • 


events 

'17.  •  4*1  EY^METR  13  iCGT*"- HAL.  3T  C CM u jE T  I  ON 
mULRT  ION*.  /  /  t  IE.  *  L  C  I  \  3  the  CT4=ETrp 
ING  Lap-. .CION  ,1.  -  •  , // T  5  »  ,  •  R  NC  T-iE  k-E  T  -  R 


Cr(4H-: 
I  v  A  TIC' 


<  //  .  'OJ. 
t//.T*»E, 


1 1  ; 

i  ■ 

— ;  / 


(  /  N  «  . 
<  /  / . : 


T4C  .  *  E  X.PRNE  I  «.■  N  RNGoE  <  3  E  r- >  =  •  .T77  .1FE13.3) 

o , '  No  m“  c 3  '  p  :t4;=  c  t  e  3  e  r  '.T-:,n> 

3,».Nlc-T  -  a  -  I  -3  (  M )  p»,  T  I  7,  II  313.3  ) 

: , • r c l c : :  -  -  r;  u : < « >  =  • , t  7  7 . 1 3  e i ; .  *  j 
*  -CP‘- w  3  T  or  lE  n'-T^(  «)  :  •  ,  T  77,  ic  El  3  .  '  ) 

3,  ’INLET  (  J  3  I  NO  3  IR  )  =  ».T”, 

I.'LJ'T-.  7!  333311  Y(Y  3  /  v  /  3  )  =• . T  /  7  ,  1  R C  I i . 

3 , • ' EN3 I T y { a s/c '  )  -  •  ,  T77.1PE  13  .1  .////> 

T  E  3  I - .  3,«<;'mR''''GLuTF  3E3I3URL  S3-- 

--.37  =  riEo"  jA.-E-  RT  -’0NiTo  =  I.3  -GCATIj, 
1<.h  '.0  -v  3  N  .  7  X  .  *  v  w  0  \  •  »  7  x  ,  •  **C  \  .  7  «  .  ’ 

3  :  Ef  .  9  <  ,  i  .  '  « .  1  ~V.  1  3  a  ,  1  H„,  l  C  A,  lr  C,  1  3  < .  1-3 

4. 1  IE  1 1 > 

5  ■?  (  .  M-  >  > 

x.lf'I  ,  E  a  1 1  f'  *  / 1  ♦  E  .  »  1  C  •’3  »  3  •  C  3  E  p.  ) 

:c., :  <  i  pp  1 1 . ! )  > 

n  3- I  Re  C -  3  E  »I Ti  _FS  3  ,13/ 

R  N  3  NGj3  :  ,13// 

ONES  Ic  N3'-h  .  l  To  3.I-L  GENERATOR  «ITH  E 

:=  ip  p  :  to  c » i - l  vane  angle  =,pk.3 


1  :  El  3.  3  > 

3  ) 

CF  Et'"i  >  5'  ' 

(.I3,M. 


«  1  R  L  N 

// 


t /  / 


799  C  0 
79500 
7 9b  CO 
7  97  CO 
7  96  30 
7  7900 
=  00  3  0 
1  CO 


$1 X , • CO“PU TED  INLET  S.IRL  Nil*  EE  9  =  »  ,  F  1  0  .  >♦  /  / 

SIX,' COMPUTED  INLET  «EAN  AXIAL  VELOCITY  =»,F10.9// 

SIX,' COMPUTE?  INLET  MASS  PLOW  RATE  = »  , F  1C . 5/ H /) 

95 C  FORMAT(iax,bF10.5«/,lCX,bFlC.5,/,lCX,*FlC.5> 

960  F0RMAT(15X,'  ThL  SCLN.  IS  NCT  CONVERGING ' > 

C  CEBuG  UNI  T(b  )  ,  I  N  IT{;uMX.EPSx,RLA9jE,fi5MALL*AMGMN,«MCNlN,FLj«I 

C  IUME  A  N,  SENS  I  T  ,  V  I  CCOS  ,  UlN)  ,  Su^C-MALL) 

E  NO 


rhOUT INE 


=  55  00 

2  0  10  9  J  s  2  *NJ! 

55600 

1  C  4 

SNS(J)  =  0.5»<: 

5  57  0  0 

XU  *  1 »  =  0.0 

a  5o  0  0 

CO  1C5  I  =  2.M 

•*59  0  0 

1  05 

AO ( I )  =  0 .5«  <X< 

r  bQ  C  0 

C  xPw  u( 1 )  -  0.0 

361  C  0 

C  x  P «  O  (  2  )  s  0.0 

562  C  0 

CxEFv.ll)  :  0.0 

-6300 

C  x  £  P  v  ( I )  =  0.C 

i  b'i  3  0 

CO  1 0o  I  =  2  t  M 

-65  0  0 

C  X  £  P  ^  c  I )  s  XUl  I 

=  66  0  0 

106 

OXPViul  I  ♦  1  )  =  CX! 

-67  CO 

'ul(l)  =  0.3 

i  oc  C  0 

w  O  IC7  i  -  £  9  N i 

5  6900 

107 

SlkO(I)  =  X(i)- 

3  70  o  a 

r 

— 

-  L'-VETLOCITITES 

3  71  00 

:  C  111  I  =  2  ,  M 

=  72  0  0 

n  ^  I  (  l  )  —  Cl«M  I 

3  73  CO 

IF(I  •  L  l  •  t)  GO 

3  74  00 

<  I  >  S  CE- -(  I 

3  75  C  0 

1  1  1 

C0\T :\OC 

■>  7o  Q  0 

r  v  < i )  =  c.o 

a  77  0  0 

5  V (  1  )  =  0.0 

3  70  0  0 

CC  10:  O  S  C.r.j 

57500 

-  V  (  J)  =  0  .3*  (  °( 

3-000 

1  C  - 

Y  V ( - )  =  0  .  <  Y  ( 

3  31  C  0 

-  C  7  <  1  >  =  5(1) 

3  32  0  0 

-  c  v  (  ;.j  )  =  r  (  \j  i 

-93  0  0 

CO  113  J=2.\JM1 

s  e<*  0  0 

113 

PC  Jl  J)  =  0 . 5  •  <  5 

3-5  00 

: ypc  j ( i )  =  o  .c 

3  30  0  U 

cyp;v<2>  =  c.o 

-57  00 

CYMFV(NJ)  =  0.0 

3  so  0  0 

vO  i  J?  J  -  C  1  1 « 

3-9  00 

CY'.PJIJ)  3  Y  7  (  J 

3  90  0  0 

105 

cypc  v<  j-i  )  s  : y 

-9100 

o  \  3  j  (  1  )  =  v.*U 

3  3200 

->3  ilC  u  -  c  •  N  J 

?  9  3  0  0 

1  1  0 

C'.C  J  t  J  )  =  Y  «  J)  - 

-  5*»  C  0 

£ 

— 

v-7t locit ire  we 

-  95  C  0 

CC  112  0=3.MJ“1 

-  0  G 

*  f"  *i  (  o )  -  C  *<  G  V  (  j  * 

-29730 

ft  c  j>  i  j  )  -  G  *«  3  V  (  J 1 

3  9o  0  0 

1  1  2 

COM  ITi^E 

-  95  C  0 

r 

i  C*C  j  C 

C 

— 

--Cn-PT  £-  t  ; 

Cl  0  c 

c 

9  02  0  0 

CO  2  0  0  1  =  1  « ■«  I 

9u3  0  0 

T  -  5".  (  !  )  =  1.3 

)  0-  0  c 

-  G  2  j  C  J  —  1  9  t%  J 

9  05  0  0 

T  ~  u  ^  f  J  )  —  i  •  G 

9  Ofe  o  c 

o(  I . J)  =  0.9 

9  07  0  0 

v  <  : ,  j  )  =  : . : 

3  0  3  C  0 

« <  i « o >  -  :.? 

-  09  0  0 

r  (  I  1  w)  —  L  •  *J 

9  10  C  0 

u P  (  1  i  J)  S  0.  c 

3  1 1  C  0 

T  l  <  I  ♦  J )  -  C  •  0 

■>  12  00 

£  :  ( i ,  o  >  =  c.o 

9  13  0  0 

CE\<  I,  J)  S  c  £'j£ 

9  1*  0  0 

7  131  I  *  J )  S  7  ISC 

9  15  0  0 

CU ( I . J )  -  0.0 

•  a  t  J-i  ) ) 

•  M  o  •  i  )  ) 


c  2  2  :-:t  ;i  =  uaLiC  to 


di  r  jml* 


f 

t 


9  77  0  0 
9  78  0  0 
9  79  00 
9  80  00 
9810  0 
3  92  0  0 
9  83  0  0 
9e<tU0 
9  9b  0  0 
9  9800 
967  0  0 
9  sc  0  0 
9  99  0  0 

990  00 

991  00 
9  92  CO 
99300 
9  9900 
9  9b  0  0 
9  Q  0 
9  97  0  0 
9  98  CO 
9  99  0  0 


SVSTAi(4G,24),wSTAR<.,8,24),PSTA9C46,24),TESTAR(4F,24>,YGTLto3(48,:.,) 
S( V  13  TAR  14  r ,29  » 

S/AL.L/IT»JT»  to  I»NO,NIMl,tojMl, GREAT, juAX<4e)»JuAxFl(49) 
$/GECM/Ito2CCS*X(46)»Y(24),2XED(46)«2xPb(48J,~Y\,P(24),CY:c(24), 

S  S  N  S  <  2  4  )  »  G  E  «  (  4  o  )  »XUt4fe),  Y  'J  (  2  4  ),  9(2**)  ,  R  V  (  2  4  >  , 

S«Fto(24),wF5<24>,wFr(<t9),^F«(<»t),sC9«24>,xto:(4-)  ,  X  o '  <>,->, 

$  YtoC< 24 ) , Y  ONE  (  24  ) 

COMM  Oto 

S/FL0PR/uRFyiS,VlSC9E,CttoSIT»  =  R4to;T,CEM46,24),\/lS<4c,t4) 

S/COlF/4P(  4-7,24)  ,Ato(40»24)  ,AS(4-,24)  ,  AE»4A  ,24)  ,  A  ,(■*-,  »  ,  E  0  « ■*  5  ,  4  I  , 

S SP (4  8 , 2-  ) 

S/K  AC  E  Tl  /  01  to,  TE  I  to , EE  I  4, FL3» i  . ,  Au  AM J A  , 

S  t'ouALl_,Rl_ARoE,ALl,AL2,JSTE-l,ISTL(-,OSTPl,JSTMl,IST  =  l,I3T''l 

COMMOto/GGF/cMOM\M5G,5G).FMOM„(5C»bC> 

CHAPTER  mil  A  SGlMRlY  3-  COEFFICIENTS 

:  o  loo  i  =  3 . 1,  i  •*  i 
:c  i ci  j  -  2 , njvi 

•  —  COMPETE  ar E  AS  AtoE  VOLUME 
A  *0  A  'J  —  RVfJ,l>,3E„U»I) 

AREAS  =  9  V< J )«SE -Cl  I  > 

A»EA  E A  =  FCV ( J) *  S\S( J) 

VOL  =  RC J < J) *SEa j < I ) «GtoS( u) 


^11  v 


ft 

I 


a  01  o  o 
0  02  o  o 

0  03  00 
3  0*  C  0 
0  05  0  0 
0  OS  0  0 
0  0  7  0  G 
'J  Jo  0  0 
3  09  0  0 
0  10  00 
0  1103 
a  12  C  0 
0  10  0  0 
:  i*  o  o 

0  15  0  0 

o  is :  o 
j  17  00 
0  15  0  0 
0  190  3 
3  20  0  0 
C21  00 
0  22  0  0 
0  21  0  0 
3  29  0  0 
0  25  0  0 
0  26  0  0 
027  0  0 
32:  C  0 
3  29  0  0 
0  30  00 
0  31  00 
3  32  0  0 
3  33  0  0 
3  39  0  0 
0  35  CO 
0  3t  OC 
3  37  0  0 
3  3s  00 
C  39  0  0 
3  9  0  0  0 
00 

3  9200 
3  9<  C  0 
u  99  c  0 
0  95  0  0 
0  <*  b  0  0 
3  9  7  0  0 


0  9  9  0  0 


3  99  0  0 
3  50  C  0 
351  00 
:  52  c  0 
0  53  0  0 
0  59  0  0 
0  55  0  0 
0  56  0  0 
0  57  0  0 
J  58  0  0 
js9  C  0 
060  00 
361  C  0 


-  CALCULATE  CONVECTION  COEFFICIENTS 
ON  =  0.5*  (CENtl»J*l)OEN<  I  »  j  >  )  •  V  <1  ,  j  *  1  ) 

ON*  :  0 .5* < SEN<  1-1  , J) ♦ S EN(  1-1 . J*1 )  ) *  V  (  I-  1  , J* 1 ) 

GS  =  0.5* ( EEN< I , J-l ) ♦ CE N<  I  * J) ) • 3 < I . J  ) 

G  S  A  =  0.5.«JEN<I-l,J)*UEN«I-l,J-l)).VcI-l,J) 

GE  =  :  E  '.<  I  .  J  >  *  <  o<  I*  1  .  J  >  *  (  1  .C-»FF  (  I  )  )  *  „  (  I  ,  u>  *«  FE  ( I )  ) 

G«  =  OEM  :-l)3)*(  3(  :-lt  J)  *(1.0-«F»(  I))*ul,>j)  mFjU)  ) 
CN  9  0  .  •  (  G  *  G  N  m  >  •  A  8  E  A  "J 
CS  =  0  .5*  (GS  .GSW> . A"EAS 
CE  =  GE*AREAE„ 

C «  =  39*A9EAE« 

CAlCLLATE  SI^F^SION  COEFFICIENTS 


VISN  =  0.25*  (VISi  I, J >. V  IS < I. J*i ) *  V  IS < 1-1 . J) -V  IS < 1-1 . u*l ) ) 

VI  S3  =  0  •  25  *  <  V  I  S  (  I*«j)*VlS(I*v--l)*VlS<  I-1«j)»vIS<I-1«U-1)> 

:  V  ISN*AFEAN/OYNp(J) 

;s  =  j  1  ss*  ar  e  as/s  y~  s<  j) 

SE  -  VIS«  I,o>  .A"EAE«/_XE-' JCI  ) 

S*  -  V  I  S  (  I-l  |J)  *  A  R  E  A  E  2  /  0  X  ^  (  I  ) 

■CALCULATE  CCEFc  ;  c IENT  0 c  SC-cCE  TE  8  PS 
S  8  P  s  C.  -  C3*CE-C*i 
CP  =  A«A  X  1  ( 0 .0 , C«P> 

CFO  =  OP 

-  ASSE^lE  vain  COEc(r  I C  I  EN  TS 
mN(I.v)  =  a.m  Axl  c  A  =  S  (  0  .  d*  C.'i)  ,  SN  ) -Q.r'  *CN 
ASd.u)  =  a-'axj  (  ahs<c.5*cs>,:s>»o.5  *cs 
SE  =  1  (  r  E, (  I  )  *CF  *  (  1.  C-«FE  (  I  )  )  *Cf  ) 

:  2  =  A8*xi(:i»,«8h(:).c^,-u.o-'»,r2(i))*cu) 

AE(;,o)  :  _E - <  1  . 0 - «FE (  I  >  1  * CE 
Aw(ItJ)  -  .*•(  1  •3>iiF<i|  I  )  I  >C* 

C  J  (  I  t  J  )  :  At  E  A1"  „ 

susxe  =  in:*i,j)-u(i,j))/sxrpt(D 

u  ^  -  X  A  z  (  w(  lio)*v(  I*1ij)J/0*F(|w(I) 

SC8CE1  :  c-uCXE • V  IS ( I, U )-:uSX6. VIS  1  I -1 ,U »  1/ OE -U « I ) 

s v s x  n  z  ( ; ( ; . u* i ) -j <  1- 1 . u-i > >/c :« j ( i  > 

: VOX!  :  ( VC  !  , J)-V < I-l ,U> ) /r-»J(  I) 

CG8CE2  =  <  ;j(J»l>«xlS4»3VSX\-8-»j).\,Is:*S93xS)/<8Cj(j)*:'fNP,lj)) 

Ss(i,w>  -  ;f u < I . j » ♦ ou < I .u > • 1 = « I- 1 1 j > -r < I « o) ) 


C  8  M  C  v  u  <  !  *  J  )  ::  T-r  v  0  w  E T  L  ‘  ■  CENTS  IrLT  ICN  J  r  TRr  0  8  0D  L  E  T  rP8Av  TC 

C  M  A  l GAS  Fl3.  FiELO  a;  a  =E0-tT  OF  ThE  axial  .ELOCIT*. 

SU  <  i  tJ)80i,l!,3)-A  «Cw9l  I  ,U  ) 


.>  L  (  1  ♦  \j  )  - 

OF  I  ,  , j)  = 

1 C 1  COST  I  N  s  E 
100  cs-.t 


(  1  »  w  )  *  (  0  J  ->  C  E  1  *  S  0  a  0  1  2  )  •  VOL 


- '.Mu'-  '  L  ' 


8  -'0  ;  F  I  CAT  ;  OSS 


:  a ll  ppo*-"':  (0 ) 


>APTt_8  3  final  3CEr.  AOSE'-r  IT  A'.O  aESIOUAL  SCr>-CE.  CAlSuLAT  I3‘ 


°ES0  : 

EG  300  I  8  3,v;«l 

so  201  u  =  :,s 1 

AP  (  I  ,  J  )  :  A'.tI#j)'»AJ(IfJ)*AsiIf^)»AW(Ifs)-Ot(IiU) 

su(ifj)  8  :.ji:».')/:mIiJ) 

PESwF  -  AA(I*o),«IIiJ*U*',S(Iiu}*v)Ito"l)4A-(1»3)*w(I*liJ) 
♦  Au<  I,  „)•;..(  I-i  ,  j  )  -  A  P «  I  ,J)  i  ,j>  »Sj  iI  iJI 
VCL  =  FCV(U)*CE-u(I)*CNS(o) 


ltv>)*Awl  Iis)-Cl  ( 


123  0  0 
1  2*  0  0 
1  25  0C 
1  26  C  0 


-,\.4G£4N 
:• :  •  4  a  t  s 


1  27  C  3 

i  - 

u  • 

A  •  l  lit 

*05 

7  )  *  au  £  a  7 

■ 

1  2s  3  3 

H  - 

3  . 

*3  •  l  >■ 

♦  03 

m  )  •  A  ^  t  A  7 

12900 

J  -  - - 

— 

I  -  L 

.  .  L  4  T 

r 

1CF.3  ICN 

C3FF  1 

13  3  3  0 

J 

lit 

- 

Z  •  40  *  * 

k  w : 

3  (  1 .  J  )  *  w 

r  <- 

»  ^ 

(  I*  1  t 

1  il  C  3 

4 

i 

r  c  _ 

.  •  6  J  ■ 

(  0  I 

.  (  I. j)»  V  1- 

(  1-  1 1 

32  3  0 

7 

%  : 

v  I 

-*  l  l  t  J 

)  •  A 

« E  i*i/;rsH  {  ji 

13300 

_ 

1  x 

V  I 

1  l  I  •  J 

-i  > 

•  A  O  t  A  c  /  7 

vP 

:w(  j  » 

1  3*  G. 

f  : 

J  I 

Zf  •  A  - 

r  if 

-/ :*r p(  i 

i 

13530 

*  - 

J  i 

1  •  *  A  - 

£  4f 

■  /  »  Jl  ^»  (  i 

) 

1  3b  3  0 

7  -----  - 

— 

-- : 

4  L  : .  L  4  T  7- 

:cfFt:  i: 

t  r 

T :  o ; 

:  37  0  3 

«  A 

:  : 

-  * 

'  r  - 

:  n 

1  i*"  G  C» 

" 

A  M 

4*11. 

■  C  • 

-p> 

1 3» :  3 

1 

►  'J 

A  J 

F 

I  *♦  J  c  c 

_ ------ 

— 

-  -  A 

'  i  v  .. 

*.  ^ 

‘4  ;  o : 

F  F 

1 3 ;  •. 

l  1  0  0 

\  : 

-  * 

4  *  1  (  ' 

M* 

*.<„)• : 

<  t 

i  i . :  - 

1  *2  C  C 

" 

7  - 

A  g 

4  »  1  ( 

-  t  * 

F  3 ( J)  •  " 

t  • 

( l . :  - 

1  *3  C  3 

A 

.  <  4 

. .  i 

-  .  I 

-(  1 

•  -j 

)  ) 

•  7  *• 

l  <*<*  3  3 

A 

1  <  1 

«  J  > 

- 

•  i  1 

»C«f ^  :lb 

I  ) 

•  w  - 

i  *5  :  o 

A 

E  l  I 

. . ) 

-  ^  S4 

4*1 

t  44  <  Q.t 

•  \ 

r  > . :  •' 

i  4b  Z  0 

A 

m  (  : 

. . ) 

z  A  ’* 

a*  : 

(  4  (  3  .  c 

• 

1*733 

- 

V  <  i 

,  j  > 

—  w  • 

A  *  ( 

A->tA'«*A- 

) 

1  *  9  C  0 

_  w  T 

L  = 

1  -  <  I 

♦  1 1 

->-.(!•  1 

t  W 

-  1  >  )  / 

1  *4  0  0 

_ 

_  3  1 

m  z 

i  „  <  i 

. .. ) 

- .( : t .-i 

>  )/:*•:« 

:  53 :  o 

~  Al  * 

1 1  - 

(  7  7 

r r  • 

j :  3r-  *  .■: 

v  w 

•  4  I  7  w 

1510. 

.. 

j :  v 

\  - 

(  .  ( ; 

•  ^  ♦ 

*  )  *  <  (  Af-> 

)  ) 

/ ;  *  •.= 

1  5<  C  3 

_ 

-  1  T 

'l  z 

< .  1 1 

♦  -2  ) 

-4i : t . - 1 

)  ) 

/  7  r  e  1 

15300 

jc : 

r  -) 

=  (  * : 

.(  1 

i  j  )  •  ■  7  V  (  J  ) 

•  2  “  Y  ’ 

1  5-*  C  0 

i 

/  c  - 

v  < . 

i  • ■ 

;(  J 

)  ) 

i  ^  j  c  c 

v  ( i 

t  o  ) 

-  ‘  r 

o  •  V  <  1  <  J  )  *  -  w 

( 1 

, .  >  •  i 

1 5b :  o 

o  •  *  *  *  *  • 

•  •  • 

•  •  • 

•  t  • 

•  • 

15  7  3  0 

; 

M  ^  fc 

.<  I 

. . )  : 

r 

..r  v'M'\ 

▼ 

“  *  .3  *, 

i  Sti  0  c 

M 

4  1  \ 

’■  J  *• 

-  fc  w  7 

<•  " 

: r  t '  a  _ 

A 

'r  2  .4 

i  tj : : 

z 

.  ( ; 

.a  ) 

4 : .  (  : 

.  .  ) 

-  -  M  r  m  ^  (  ; 

t  W 

) 

1  bu  C  0 

•  •  « 

•  •  • 

•  •  • 

•  • 

1613  3 

(  : 

*  J  » 

- 

<  : . 

.  j  ♦  c  .  *  *  * 

*  r  ~  k.  "  , 

1  Ot  C  o 

- 1 . 

•  V  ) 

-  - 

16333 

\ 

P  <  i 

; 

7  • 

-4  • 

l  l  j  5  T  C 

1 

'  l 

lOH  C 

z 

.  <  i 

t  j  ) 

=  .  _ 

(  I  . 

.  )  ♦ V  OL  •  < 

( : 

L.4  t  I  , 

1  65  2  3 

1 ) 

•  *o 

j  /  ( 

**•.•*' 

/  <  J  >  ) 

1  bb  0  0 

_ 

a  (  ; 

*  ^  > 

- 

(  It 

^  )  -  <  1  1  .  ( 

i  t 

.)  *  t  1 

1  b  7  C  0 

4  i 

.  ■(  7 

r.  - 

t 

1  b  i  C  0 

1 

i*.- 

1  69  C  O’ 

*  73  C  C 

>-r  T  •  3 

7  . 

7 

b?  A  .  •  w  7 

V 

*  F 

i  n  j  3 

_ 

1  72  C  0 

~ 

-L. 

•  - 

;  * .  < 

3 ) 

1  73  3  0 

1  7*  C  C 

i_nif  T  *  - 

1 

i 

f  ;  t 

-  w 

: ,  •:  f 

17630 

- 

* 

“  J 

-  ' . 

1  7fe  0  0 

_ 

i 

'3 

i  - 

t 1 

U  1 

1  77  C  0 

“ 

i 

0  1 

j  -  1 

•  *.  o 

-l 

.  7e  3  0 

A 

*  <  ; 

1  O  > 

-  A 

( 1 1 

«-  )  ♦  A  _  (  It 

w  ) 

♦4(1 

1  79  C  3 

_ 

4  (  l 

•  J  > 

-  ,  4 

(  I  • 

.  >  /  4  f  <  ; , 

J  ) 

1  iC  00 

- 

r 

-  = 

4  M  I 

*  s 4  ) 

•  ^  < :  t  o  ♦  i 

)  ♦ 

43  (  I  , 

1  -  l  c  c 

i 

♦  A 

^  <  !  «  J  >  •  4 

( I-l tOl- 

4°t  j> 

1  9  2  0  0 

w 

:l 

=  - 

*  (  w  )  * 

-f.  m 

< I ) •  53* 

« ^ 

) 

l  “  J  V(  w 

-  *•  V 

jU 

-  '  -  f 

A  r  . 

.  3  L 

15.62 

r  ; :  .  * ;  l  r  £  -  “  •_ 


••:  -;:ul  -ju::  : T' 


: ;  2 )  •  j  u  l 


It 

# 

53 

I 


\ 

■:% 


:  84  0  0 
1  85  0  0 
1  8b  0  0 
MT  00 
1  00  0  0 
1  -59  0  0 
19000 

1 91 0  a 

19200 
l  9.5  0  0 
1  9*.  CO 
l  95  00 

1  ->t>  0  0 

1  97  C  0 
1  is  C  0 

1  99  3  J 

2  0000 
2  01  CO 
J  02  C  C 
1  0  3  0  0 
cO«CO 


:ci-sp(:,j)  ,oT,  o.5«corvoli  peso*  s  acoo«/r ;  =  vol 
=  egg  ay  a  9-. so8^*Ab‘S««£:io») 

^ n ;e " -at  la  xa  r I om 

AP  ;  I  ,J  >  a  AP  ( : ,  J)  /09P  J 

w  (  i  .  a  )  A 

2  x  1 1 , .  >  : 

501  ; :Nr  iSot 

*  3  j  : :  \ T  r. . r 

*  A  F  T  t  9  4  -  4  2  3  l  -  T  I  0  S  OF  _1FF:.-2N2E  L  2  v  A  7  I  0  S 

::  433  *.  a  1  ,\s*p* 

t 


235:0 

;  -  i  r  r  •  -  :  :  ; 

_ 

.  2  3  •  -  L  L  ;  9  .  “  N 

a-  1  l  : 

-CO 

«  J  0 

2  ot>  c  0 

.0733 

“  '  MM  -M 

2  0s  3  3 

l/.VLt/v 

-  -  .  «  '>  j  -  a  <  -  -  F  ,  •  2  »  r  9 

,  (  4  A  )  , 

-  »  Pdv  «  4  9) 

■:  m  l  ( *  a  j 

3  0  9  3  3 

i/Wt  L  /  -  * 

“  W  »  1,  4  1  *-  “  P  t^Y\P 

»  (  i  - Of 

. t  p;^  i24»  ,  j 

53Vlii| 

►.  1  0  G  'J 

!/..  ■-  L  /  A  - 

-  <4  1  C  4  ^  1  w  “  C 

:  11  c : 

!/*-'./=• 

* 

K  f  *  9  w  "1^4 

;  u : : 

i  . 

-  -  :  * 3  «  9  .  •  .  -  F  3 

2  13 : 3 

- 

»L  •*  *•  >  ♦  «  1  ‘‘f  » 

?  *  )  « ::  c 

•4  — 

.  2  4  >  ,  -  A  ,  H 

3  1  ^  « 

2  14  Q  3 

1 

*E7(*e»2»**  2’rM»a, 

:  *i  >  *  *  c 

’  L  M  1  *  i  2  *  1  ( 

it  .ali:*)  , 

;  1  d  c : 

1  - : t. k  ( -  - 

f 

.'*♦  )  *  V  ^  ^  *|*r. 

T  AK ( 48 

t  2 

4>,F3’:a(»(,2i), 

>  ih  a : 

lit  i :  a- i  - 

- 

•  *.  *•  )  t  t  a  r  L  '<  .  (  9  1  2  *♦  )  1 

3  I  2  T  A  9 

i  * 

8*24) 

2  17  3  3 

1 / All  /I T . 

T  »  i  I  1  Nw  1  M  ^  1  *  N  J  M  1  *j 

s  L  A  T  ,  j 

M  ^ 

«  1  4  a  )  ,  J  “A 

«p  1 1*  -  > 

3  lo  0  3 

1  / :  0 :  “/  :  •. 

“ 

■ ;  '  • * ( 4  3 ) , y ( ?  4 

;  m 

Pi  I*  a )  ,  y 

\P  (  24  )  .  '  *  P  2  <  '  4  ) 

.19  0  3 

A  -■.5  1. 

)  %  1*1  9?  )  |  ")  ftll 

1  2*  )  .  A 

1 . 

*  )  ,  F  W  (  2  *  ) 

t 

2  2  G  C  3 

3  .('.I. 

•4 

ll*f 

Fmvl 

♦  ~ 

C  w  •  2  **  >  •  « 

3  t*6i  i«.'.  3  iii  1  1 

2  213' 

!?*.:<  2  4 ) , 

T 

2.  < :  4  j 

,22  C  . 

;  .19  /. 

-  25  3  3 

l/cL-P- 

- 

-  - : : ,  v : : : :  5 .  „  e  s  3  :  ’ . 

9 1 

t  N  l  *  -  *  2  *  ) 

*  v :  0  <  4 . ,  1  *  > 

.  24  C  3 

*  /  *  a  ;  2  T ; 

/ 

.  i  3  .  7  E  IN.EEIN.FLuwI 

■.  .ala« 

:  & 

• 

•  il  v  - 

1=  '-“A  _L  ,  - 

L 

A-  ■  A,  ali  , Al3, J2T EP. 

: :t a  p. 

j  l 

t  p  1 ,  j :  -  9 1 

.  1  2  7  A  1  ,  ; :  7  v  1 

-  2=  3  3 

i  /  T  -/  • : 

. 

(*•' 

2.-93 

“  ? 

•IlvC-.f-  : ; 

,PiTC 

.  ti  1  .  . 

!  /  .  -  L  i_f  /  • 

r 

L  -  -  <  4  -  )  |«1LL2«Ii*> 

(liv'd*' 

j  •  T  M  ^  N  <  *4 

) 

2  r  C  3 

1  /  3  2t  F/A. 

( 

-  , 24  )  , AS <  4  s  t  2*  >  1  A3 

l  4  -  ,  24 

>  t 

»  -  «  (  <»  J  •  J  *•  )  »  "  v  (  9 

)  C  r  -* 

.  4.  -  - 

1  - 

) 

t  0  r  ' 

- ?  *  *42  ^ 

« 

;  ■■  L  T2  "  A  ;  *. 

-3133 

; c  <  -  (  1 . 

1 

i  •  L  r  •  J  •  O  )  -> 

I  - 

3.;  :  ; 

" 

-rAP’-.A  ,  l 

;  1  -3.a9.._,  : 

v  -:  f  f  ; : 

I  ! 

T  3  1 

1 

.  i*  3  „ 

-  35  G  0 

3  J  !  *  3  . 

=  .si-*: 

_  18  0  0 

. :  lei  2 

A  -  2.21 

.  5  7  3  3 

c 

J  5c  C  C 

: - _  m  p  _  t  •_ 

-*L  i'j  _  VuLoMr 

.  J9  3  3 

1 

3  4  &  3  0 

;cr  *»(  ; 

- 

.  ( .’-I  >  •' r-i :  > 

.4133 

- 

- 

v  < .. )  •  J r  «  U  ) 

iic  30 

>[-t.  A 

;  i  j)  <-‘.5  (  j> 

.’  4  3  C  0 

x  2L  a  a  . 

4 

( 0  >  •  2.v.  (  j  )  •  ( 1 ) 

.  44  0  3 

V. 

1 


, 

r\ 

y 

% 


35.83 


* 

V 


y  ■.  > 


<  r  \  ( i  •  j  )  ♦  j *«  i  i «  w  ♦ : )  >  •  4  ( i  •  w  ♦  1 ) 

l-L  '«<!%»>)♦  i.*«(  1  I  J"  1  )  )  '  <  (  I#J) 

i .  i  \  i  i  •  u  >  ♦  r  \  ( < :  •  * ,  w  ) 

l  r  %  (  I  t  )  ♦  *  f  \  <  l  -  1  |  W  u  •  .  (  !  |  w  » 


~  T  .  1  *  ”  ^ 

* 

n  *  1  »  w  )  ♦  »  I 

<  :  • . 

.  !  i  I  •  w  )  •  .  ! 

-  1  .  1  w 

.*  <  t  •  .j  )  •  4  I 

_  (  .  *  * 

j  \  '  i  I  •  ^  >  ♦  «  I 

(  1  -  . 

~  *  i  _  ) 

( v  > 

- r  m  /  .  ».  1  •”  <  . 

> 

‘  *  < 

) 

w  .  '  V* 

...”  f* 

’•  .  *  t  *•  ;  ’  •_ 

<  r 

- * l  (  -  -  :  <  " . c 

~  >  1 1  ~  ~ 

-  *  i  <  - 1* :  i : .  - 

•  r  •  >  * 

^  A  1  l  -  -  .  (  J  ,  * 

• :  *  >  • 

f  •  cr  : <-  ) 

,( 

-  »»•  <  I  ♦  -/  ) 

i  ♦  s*n 

. .  ;  )  ‘  :  r  o 

i  : 

<  !»«)•»-/■• 

i »  j 

'«•  -  *  i  o  ♦  i  J  -  «/ 

i :  •  w  >  *  i :  /  -  c 

t  i  ♦ :  j 

<*>)•„(  I  ♦  w  )  /  ( 

-  i  ^  )  •  J  ^  L 


-  *  f  V  (  -»  )  • 


<  -  ) 

i  . - L  ~ 


.  ♦  .  o  : 

(  I  •  J  )  •  “* 

(  t  i  j)  *«(  i  f  v*i  )*-'J  I  t  o  J  •  m  (  i  t  ^  -  1  )  ♦  -  •  ( 
•  *  *  1  -  1  «  o  >  -  «  I  i  ,J)  »  \  |  ilw/) 

J  )  •  .  f  i  (  I  ) 

"  -  •  JL 

>  •  *  t  T  *  /  0  ^  -  -  t.  . 

.  >  -  - c  =  c . ; 


s«swS5* 


su: 

.1  /  ►  * 

-/- 

—  •  4  1  *  r 

f 

«  - 

-  f  _ 

)  t 

~ 

3  (  »c  • 

•  1 

ts>Fu 

■2 :  c 

!/<~~ 

/.<*- 

•  4  *4  )  t  •  <  -4 

r 

t  i. 

•4  )  ,  M  t 

( 

•4 

.  PP 

{ <* 

i  i  c : 

1  T  r  (  ^ 

t "  ( <4 u  t . 

H 

)  t 

'  r - • (t-,3*i, 

r  1 

T 

L.  5  (  » 

■  t  H 

i  t 

3  T  ,  SL  ( 

5**  ^  * 

S^'-T- 

T :. 

- 

( 

-  • «:  *•  > 

t  M  -  -  -  4 

4  -4 

t 

t  **  )  t  * 

3  TA 

- 1 

-b  . > 

is . ; 

i  t  •; ;  r 

A-«-- 

..•«>. T  T 

L 

'•  " 

f  *•  -  t  * 

-  >  t  j  i :  t 

a- 

f 

> 

a,  o : 

^  /  “  L  L 

/ 1  r  t  o 

’  »M  t‘i  - 1 

\ 

*  V 

:  •*.  .j* 

1  •  G  -  €  A  • 

t  j 

VI 

4*1- 

)  *3 

'-a 

•  P  - 

*?  - : 

i  /  G  i  .. 

v  :  . ;. 

-  .  .  t  *  l  *  n 

) 

♦  t 

<  *.  ** )  t 

~  ;  a  ( *♦ w 

)  t 

’J 

A  P  M  1  >« 

-  )  . 

r 

5P  (2-  ) 

5-3 3 : 

\ 

_  ** 

)  •  - 

) 

•  * 

o  i  **  -  ) 

t ' 

1 

«  *  *  *  9 

V  u 

•4  ) 

« 

39  C  0 

\ 

z  \  (  ■  <* 

> , « c .  < : » > 

t  *6 

r  r  (  4  , 

)  *  *  "  «  1  4 

-  ) 

• 

;  c  j  » : 

«  ) . 

*  ", 

'Ivli 

«CC5 

*  Y  M  ( 

;  •« )  •  * 

.  ~  ( i<> ) 

*•5  01 

: 

~  •  t 

-:  t : 

!/fL. 

*■  J  I  -  t  J  I  -j 

v_ 

VJ  ■_ 

t 

!  7  ,  -  S  3 

"  T 

• 

:  r  \  *  <• 

5 ,? 

*4  ) 

,  v  i :  *  a 

**  *  C  3 

s.  / : : : 

-  /  -  -  < 

*  *  »  l  *  >  *  - 

*, 

1  * 

z  * :  “  > 

2  * 

> 

iiii" 

'  i  7 

*4  ) 

*•*•3  5 

i  -  -  < 

z  .  .  -  ) 

*5  C  3 

i  /  -  -  - 

* .  T 1  / 

.  :\ 

t 

L  " 

r.  •  *  l 

CblN.iLA-* 

A  » 

<*b  3  C 

;  -  '  m  j. 

uci  ■•  L 

-  -  j  r  t  a  L  i 

* 

Al 

:  •  - :  t 

r  r  «  IC7- 

f , 

u 

-  TP1  , 

oCT 

M 

,  i :  t  c : 

s  7 ; : 

-  ll  , 

;  u 

-  •  o 

*•  s  L  5 

“9  C  5 

. t  m 

;  : 

;  l  i 

1 

a  : 

»  -  .  *  3:  F 

) 

3  f  r  ;  ■- 

i  •  n  t  : 

i 

5C  0  3 

- 

->1  2  J 

-  .  1 

,  „  » 

-  .  t  \ :  "i 

3"  3  . 

-  i 

:  l  , 

-  w  t  .  O  W  1 

35  3  3 

-  “ - -  -  »-C  w 

* '  : 

~  r  ^ 

\ 

_ 

;  ~  L  w 

■5“  3  * 

a-  r  - 

z  •• 

>  ( j  *  i )  • : 

r 

M  ( 

: ) 

3  3,3 

A  *•  L  « 

'  -  - 

V  (  o  )  *  S  *  ft 

( 

; ) 

5t j  3  3 

-  -  c  - 

‘ .  m  - 

’ :  -  i  o )  •  : 

\ 

o  I 

o  > 

57  3  3 

-  -  L 

:  - 

( o  >  •  ;*..< 

)  * 

:  l 

) 

5"  3  0 

: - r  a  l 

:  .  L  A  T 

';rf  r  • 

" 

•  r 

*.  r  " 

5^  C  3 

-  L  *i  *« 

-  ,  . 

‘  •UM  . 

♦ 

J  ) 

♦  v  *:  %  < 

> 

6C  c : 

1  i.  Y  j 

-  V.  • 

I 

t 

Ji»3t‘.i 

I  »  w  - 1  >  ) 

hi  C  3 

;?  \e 

—  • 

i.  *  < :  r  \  <  i 

i 

O  > 

♦  3  5  \< 

i»i . j » > 

62  3  0 

' r  \* 

-  ,  • 

u.  •  i : r  \  ( : 

♦ 

J) 

•  -  r  *.  t 

:  -  i  .  j  ) ) 

b5  3  3 

*»  \  (  i 

tO  )  - 

.  f  \  %  •  M  -5 

E 

a*. 

•  ^  -t  <  i 

t  o  *  1  ) 

6“  3  3 

--I  i 

txJ  )  " 

_  •  % :  * « - 

r 

«  : 

•  »  9  «  1 

.J) 

65  C  C 

a  £  (  i 

to)  - 

■  •  ,»  •  «£.  r 

a  L 

•  •  ^  L  • 

I  *  1  f  J  ) 

66  v  3 

a* < : 

f  J  )  - 

■  r  •.*•  3s- 

r 

a*r 

*  •  3  -  ( 

*  *  J  ) 

»  o9  0  0 

GtN( 1 ( J)  -  ( 2 m U * i 0 

4  90  00 

if ( I  NO  CO  3  .23.  2 i 

4  9100 

IF  (  s  \j(  j)  .2  3.  0.C  ) 

4  92  0  0 

'3  39  =  J  (  1  vJ)/F\MJ) 

4,300 

IFdbOCuS  .  -  8.  2) 

"  94  0  0 

S R  J  <  J  ♦  1  )  )  • 

4  9b  0  0 

3-3  TO  12  3 

4  960  3 

112  .20.  :> 

4,7  00 

1 c « <  0  *  1 >>*•<. 

4  9F  C  0 

12  3  C 3  NT  I  NOt 

*1900 

b  0  0  0  Q 

AM  I  ,  J)  =  AVAX1  t  1  = 

»*2  >*v 

>  )  •  I  0  6  2 


'0133 
b  32  C  0 
5  03  C  0 
'.  C4  0  0 
3  06  0  C 
b  06  C  0 
b  3?  C  0 
'  3e  G  0 
09  0  C 
"13  3  3 
3  11  CO 
-.12  0  3 
M2  3  3 
b  1  *  0  3 
b  lb  0  0 
b  lbCC 
17  3  3 
b  1  o  3  C 
b  1  9  C  0 
b  2  0  3  3 
'3103 
^  32  8  C 
b  23  3  3 
-.2-0  0 
t  2b  C  3 
b  2  6  0  3 
b  2  7  3  3 
o  2  c  3  3 
b  29  3  3 
-  30  3  C 
b  3  1  3  3 
■3233 


: si i to  ) 
v •  •  2*2 *3 » 


•  V  <  I  t  v  ♦  1 


- A  S3  t  “F  Lb  “Alb  CCbFF  ICIE'.TS 

iMItJI  -  AVA.X1  t  i«0  t  0.b»  CM  v  3N> -3  .*  •  CN 
AMivJ)  =  A«txi C -FS « 0. b* C 5) . - 2 > ♦ o . b • CS 
AL«1.J>  =  A“  AX1  <  A  S3  I  C  .b  •  C  2  >  .  3  2  > -C  .  b  •  22 
A  iv  (  1  t  J  )  :  A“  AX  1  (  A  o  ;  <  0  .  b  *c  «  )  V  '  *  )  *  0  .  b  •  C  « 

8  L  (  IvJ)  '  3  "*  0  •  T  ■  (  I  v  0) 

<  I  VO  )  -  3o  (  1  V  J  ) 


Sw  I  I  V  j  >  = 

3  ?  (  I  ,  V, )  ; 

3c“-3(Ivo) 
M<  i  v  ~  )  ; 

3  3  b  T  I'.v-t 
.3b*  I  b  -  ‘ 


I  (  I  |  J  )  •  'J  y  L 


IFCvJI 


•  ~  l  N  » 1 v  j ) • • 2  *  T 2 ( I ,0  >• VOl/V  I  : 


>  .  .  „  2  “C'l- i2ATi3b  z  2  . 

:all  f  =  „ « c :  (  6  > 

f  i  ’ll.  C  I  ;  i  r  T  A  c  s  b  “  1  w  T  Ab3  ^E$I2viu  SOwCC: 

-  r  3  ^  -  «  -  »  u 

3  3  3  2  3  i  -  2 , M “  1 

.2  3  01  J  =  ..  v  b  J  “  1 

2*  (  I  »J  )  -  -'i(Ivj)*-3(Ii3)*if  llvu)»“«  llvol'31  llvj) 

=  •:::=  =  :*.( :  t  j>  •  Tb< : ,  j*  i  >  .as<  i  v  j>  •  rr  <  i ,  j-i;  *af  «i  ,j  >  < 

"  A  «  <  I  ,  M  •  T  M  1"’.  vOl*AP<  lvJ)*TM  1  i  o  J  *3  w  i  1  v  O  ) 

j  :  l  =  - : ;  ( .  >  •  c  b  3  <  o  >  • :  •: «  1 1  > 

3  3" i 3  L  ;  - b  A  7 • 2  0  L 

.ot.  o - -3 •  s ^ J v c c »  =f3c-»  =  f25cc/::=vol 

r  -I  3  8-  <  *  A  2  3  (  9  3  3  M  » 

•---b.L---  :  i.  A  X  A  T  ION 
A-(itJ)  -  AP<Ivvj)/o"Fk 

:.(ivJ)  ^  ‘ .  ( :, j» ♦( i. c-l; f« > • ac< i, j) .  it < : 

3 :  b  r  i  •. „  t. 

;  *  b  r  r.  ... 

-  -  -  *  »  *  3L  .  T  :  r*.  ~c  :  I  f  F  r  ;  r  bC  b  b  8.  A  T  ;  b  4 


Au.LAr 


< :  *  i  v  j  j 


*  '  U  -  I  t'i3*F< 

A  l_  L  L  I  .  .  L  i  I  2  v  2  V  M  v  v.  “  A  ■«  v  I  TvvjTv*r  v  b  ) 


i  ■-  II'-  -  - 1_  * 


'■■i :  “ :  *.  a  c  i  ■ 


5  50  0  0 
5  510  0 
5  52  0  0 
553  00 
5  54  0  0 
5  5500 
5  56  0  0 
557  00 
5560  0 
5  5900 
560  0  0 
5  61  0  0 
5  e»2  0  0 
5  63  0  0 
5  6“  0  0 
5  65  0  0 
5  Ob  0  0 
567  0  0 
5  6600 
565  0  0 
3  7C  0  0 
57100 
5  72  C  0 
5  73  0  0 
5  74  C  0 
5  75  0  0 
3  76  0  C 
3/700 
3  7=  0  0 
5  79  00 
5  -C  00 
3  =  1  00 

5  9200 
3=300 
5  84  0  0 
5  =5  0C 
5  66  CO 
5  67  00 
5  =6  CO 

3  =  9  0  0 

5  90  0  0 
5  9100 
3  92  0  0 
5  93  00 
3  94  c  0 
5  95  0  0 
5  9b  0  0 

3=700 
3  9=00 

5  99  00 
600  0  0 
=  0100 
602  0  0 
603  00 

6  Q4  C  0 
a  05  0  C 
606  00 
6  07  0  0 
b  0  6  0  0 
=  0=  0  0 
6  10  0  0 


ky  •a/'vC-VvV*. 


S/T2IS/RES:RE,r»S»PC.U0Fr 

t/7Afi/U(48*24),V(4R,24),W(48,24),P(4P,24>,PP(4e,24), 

STE(4fii24)jC0(4Bi24)iSTfMiie»24)»t3TLh('teii»)i5TVlLCit)i 

»USTAR(4=,24|,u£r4R|4a,24»tl,ST4C|48,2«)tFSTAt«4fc,24», 
tT£3T4R(46,24)tr:TL\:<4-,24),l/I£;i9(4ct24) 
i/ALL/IT,Jl*Mt%o,\191,rjJ91,38*;ir,JMA)((Hc),  =  R4/iPl(4«) 
s/gcoh/ i  ■ic:cc,x(‘*=>,v«24>,;x  =  5  Pi  2**  ).;y  =  0(24), 

S  G\S(24>«SE«(4b>(Aw(*6).Y</(24). 9(24), :v  124), 

1  a  F  N  (  2  4  ),hFS<24  ),»PE(4e),«Fa(4H)  ,6  C  7  (  2  4  )  ,  x  N  2  C  4  e  )  ,  *  U  5  2  (46  )  , 

1Y‘,3  <  24  »  ,  i  752  H  > 

COMMON 

s/9LuP9/o9,r'j;G,u;c;o-,:':‘.£iT,»9AN2T,:£\(49,24),wiG(4-,24) 
i  /  A  A  2  E  Tl  /  uI3,Ta1*,  ,A-I>»*FLGal7»AwA*OA, 

tR=l4ALL.r|L4rGE,ALl,AL2,JST£r,ISTiF,jOTPl,J5T''l,10T=l,I0Tvl 
1/  T  u  A  6  /  J  C  *4(4  -  ,24  )  *  C  u  ,  *2 1 , 22 , CAPPi  ,  ELoG,FFt3  ,  P  P  T  £ 

l/=Al.LF/YPL=G,.(4n),irPLoS«(24),Tio';(‘.6),TiJA(24) 

X/CoEc/AP(**=,,;4),a\('»o*2  4)  ,mS(4  =  ,24)  ,  AL  (**  :  tC  4)  ,Aw(h  =  ,24)  ,Su(4=,,-)  • 
t  2 f ( 4 6,24) 

i/su:p/o^:i^i2M,  :D4:(4-,24) 


PTER  1 


1  1  1 


;  =  l  y 


:oefficients 


:c  loo 

\j  o  •  o 

2C  101  J 
--CORPuTE 
A=EA\  : 

A  =  £6  2  = 

vci  3  -'0 

- :al:- 

G\  3  0  « v 
G  3  3  0,5 
GE  3  0.'' 

-'a  3  0*3 

C  ■<  3  G  5  • 


3  2,\IM1 

a  ( ;  > 


--  z 
n  j 
,  (  j 

-  C  7 

Mu) 

.ATE 

<  2E 

<  _  E 

(  ;e 

<  :z 


*  jj 
A  3 

♦  1 ) 
)*S 

<  J  ) 

•  ON 

cc 

M  I 
\  (  I 
•.<  I 
\< : 


52  7  0  L 

•  ge  4 ( : ) 

a(  I ) 

G\S  <  J  > 

_  (  J)  _ 

V7  EC  T  I  0 \ 

,0  ) 

,  v  )  ♦  2  E  5 

,  J  ) 


m  r 


c-  E  „  (  t  ) 


0  E  c  F  I  C  IE  ME 
■-i  <  I,  o*l  )  )  *  V  (  I  ,  J  ♦  1  > 
<  I ,  J-  1  )  )  •  V  r  I  ,  J  > 


v  >  ♦  E  E \  (  I  , J-  1  )  ) • V  (  I  ,  J  > 

J  )  *  :  E  N  (  l  ♦  1  ,  J  )  )  «  u  (  I  *  1  ,  J  ) 

j )  * :  e  ( i  - 1 ,  j  )  >  *  2  ( i ,  j  ) 


i  a  a  e  a  : 


iMAEi 


■  -  -  -  u  M  L  . 

ij  A  ^  \  z 

G  A  M  S  - 

G  i  M  E  - 

G  #*  - 


,L  ATl 

.cr*  ( 

y  •:  *  < 


-/  M  -  J  M  •  M  *  M  *■ 

-•-GG  g^GL  t l  ■* 

:mp  =  c 

OP  r  A  ■a  A  X  1(0 
2P0  =  i> 

--  A  2  G E  a 

A4,  (  1  ,  J  ) 

A  G  <  ,  ,  J  ) 

A  A  (  1  ,  J  ) 

A  a  (  I  ,  J  , 

2  -  (  t  ,  O  ) 

s  , 

U„(  1  ,0  ) 

CP (  i ,  j  > 


2IF=u2ION  CJEF- IG1E9TS 
V  I  S  « I  , J ) ♦ 0  I  3 (  I  ,  J  ♦  1  )  )/P9E 
Visa  «  u  >  ♦  7  I  G  <  I,  J-l  )  )/  =  =£ 
VIS( I  *  J)  *  7  I  3  <  !♦ 1 , J) ) / P3  E 
7  1 3 ( I , j  > »  7 1 2 (  1-1, j) >/P9E 
E  A  .5  /  0  Y  \  P •  j  > 

EAG/2  yp  G  <  j  ) 

EAE-/2XfP(I) 

EAE./Oa)  ,(  I  ) 

"S 

CE-GR 

.0  ,  -  AP) 


■LE  M  AI*I  C0EFF101! 
=  A  a  a  x  1  <  A  e  G(0.5* 
3  AMAXl(A3G(G,3* 
3  A.AAxl(Af)2(0.G* 


o) 


TG 

',)  ,DN)-0.5' 
G  ) ,  3S  )  *  0 . 5  ■ 

E  ) ,  2E  > -0, a  • 


,  •  c  w> , 


i  >  »  C  ,  5 


~a;xi«A«GcC 

CP  u  •  C  2  <  I,o) 

3  G  (  I  ,  J) 

2u( 1,o)-C1«2u^*6l7(  I,J)*70L«2EN(I,J)»tE(  i,j)  /  v  I  3  ( 1 ,0  < 

p 


35.69 


a 

ft 

r, 


1 


1 

5 

> 

,*■ 

6 
3 

'j 

v 


r 

r. 


3 

‘  J 

1 


6  11  00 

sp*: ( : .  j  > 

= 

CP(  It J) 

al200 

SP(I  ,u)  = 

r  p 

<ItJ)-C2*:ENl(  I  to 

)  •  E  C  <  I 

* 

u 

)*V0L/TE< I, J) 

falJCO 

101  CONTINUE 

b  14  0  C 

ICO  CONTINUE 

b  15  00 

c 

3  lb  0  0 

CHAPTER  c  2 

«_ 

2  PAO^lE'I  HC"!17 

1  CAT  10 

*4 

2  2  2  2 

o  1 7  Z  0 

c 

s  la  0  0 

CALL  ”G* 

CC  ( 

7) 

b  19  0  0 

“ 

o2Q  C  0 

CnSFTi*  3  3 

i 

COEFFICIENT  ACC 

E  4  - r 

ft 

2  RESIClAL  COERCE  CALC..A 

o21  CO 

C 

b22  0  0 

RfCCRE  - 

<4  ** 

V  •  o 

623  OC 

CC  303  : 

—  (. 

iM'l 

t)  2^  C  C 

3  C  3  01  j 

-  j 

.*.JM1 

o  2  b  0  C 

A  P  <  I  ,  J  )  6 

~.‘4 

( 1 1  J)  ♦ ( I ♦ J l 

(I.Ji‘ 

A 

to 

<  I t  J ) - o  F  <  I,J> 

626  OC 

=  E  Z  0  R  =  A 

N(  I 

iJl-ECl  It J* 1 ) -Ac 

(  I  ,  o  )  • 

E 

1  I  t  o  -  1  )  *  A  E  t  I,J)*E-  (  1*1,  J  ) 

b2  7  0  0 

i 

i  «< 

I*J)#EJ<  I*  1  f  J  )  •  * 

p ( ItJ) 

• 

r 

:<  i,j)*"j (i,j) 

b  2c  0  C 

0  0  L  =  -V.W 

( j  > 

*„•.-<  u  >•  o  L  «(  I  > 

6290  0 

C.  'w  V  0  L  — 

; r 

«  T  •  j  0  L 

d3C  C  0 

I  F  <  -  Cp  <  It 

3) 

.CT.  C.5*SCcV0L) 

"CO® 

= 

RECOR/CCRWCL 

oil  0  0 

=ESCC£  - 

-.:_C 

J  *  E  ♦  ~  r  C.  (  9  l  C  0  *<  ) 

632  0  0 

C - ^,u£- 

LL  A 

X  A  T  I  0  6 

6  33  0  0 

A  r  (  I  t  J  )  - 

~r 

(  ItJ)  / L “ F  E 

6  34  c  0 

c.( ; t ji  = 

< :»j)*(i.c-l=fe) 

*Ap(  I, 

j ) 

• EC(  I  , J) 

o  55  0  0 

3  C  i  l  0  %  T  I  %  w  l 

6  ib  0  0 

30  0  CONTI'..-, 

637  CO 

£ 

o3o  CO 

>;PTre  4 

- 

-  4  CClJTIC.  t7 

:  t  f  rr 

r 

\i  C  E  EOLATION  4  4  4  4 

o  39  0  0 

c 

stC  GO 

-a  4oa  •. 

-  i 

%  »  —  *  w 

6  4 1  C  0 

4.:o  call  l  i  ^  c 

L-l 

2*2  »  M  »  ^  i  I  %o 

T, EC, 7) 

b42  C  C 

t  r  t^c\ 

6  4300 

e 

to  44  0  0 

r 

r 

O  *  j  U  v 

~ 

n  Hb  Q  0 

£ 

6  47  00 

C  -  ~  ^  7  •  ’• 

-  - 

: i c l.  j<  : ;  ta=  t  ,  0st 

AAT.NI 

« 

SJ 

«-*tIT,jT,PHl,NC4AP) 

O  ’O  ^  u 

6  49  CO 

- 

b  50  0  0 

C  r1  A  x  T  _  R  j  . 

*  r 

=  e  l  :  •'  i  \  a  »  i  r : 

:  o 

0  4  0  c 

031  00 

z 

652  CO 

c  i  me  i 

t  H 

It  IT, JT  >,A( 4: 

t4  >  , ; 

i 

H 

“> ,C(4- Jto^AXt II ) 

6  53  C  0 

C  Z  Mv  z  *. 

6  3*00 

.-/■a:-;  ' ;  / 

-  i 

"t  t  A  w  A  v 

-j 

H 

f 

b  33  0  C 

l  -  3  M  -  t.  L  .  “  L 

-  -  • 

l*Al1*ALo,JETEP* 

icte  =  » 

j 

2 

TP  1, JET "1  ,  ICTP1 , I C  T-l 

6  56  C  0 

*  /  C  jI  c/ a;  ( 

•*  J  4 

)  i  t  *• )»  -  * 

(  *  *  2<* 

> 

f 

“  L  l  4  :  1  1  *•  )  |t  «<■**«  c  4  ) 

6  57  0  0 

s:s(tc,M 

6  3-  C  C 

^  ^ i  -  j" 

T  i.  - 

T-l 

6  55  0  0 

; 

- ; 

h  6  0  0  0 

A  (  ^  .  4  [  >  - 

• 

7 

o  to  1  C  3 

^  _ _  —  _  '  ■  .4  V  .*  *  4 

-  r 

c^efp 

d  o2  0  0 

‘  '  1  «  .  *  - 

I  -  * 

T  *  *«  *  M  1 

b  e>3  0  u 

:  <  j  c  M  l  >  - 

r  >• 

1 1 1 ,  j  c  M :  > 

ib*  OU 

c - 

.  T'-  AO E  * c r 

b  O  C  u 

o :  =  j',;< ( :  i 

b  oo  C  C 

lp(,«Cn**»’ 

•  *. 

.  ..  >  J i  - JM  A  <  <  I -1 

) 

b t>7  C  0 

:  c  101  j 

;  j 

T  A  -  T  ,  j  I 

to  6c  C  0 

C  “  - -  ~  ^  .  L 

-•  L 

e  *--£  Co'FF  I  r  I  e- 

?  ' 

r>  b  9  C  0 

A  (  J  )  ^  A  *. 

< :  t 

J ) 

6  70  00 

:U)  =  -C 

( 1 1 

o) 

b  71  0  0 

Z  <  O  )  -  -  L 

( :  ♦ 

„!•’  *Il  I  t 1  ,  J) 

1  I  «  J  )  • 

Hltl-I  tJ)tCL(I,J) 

33.70 


Y  V 


,l*  + 


1 1 
I 


6  72  CO 
b  73  CO 
b  74  0  0 
6  75  00 
b  76  0  0 
b  77  0  0 
6  76  00 
b  79  0  0 
o  r  0  C  0 
o  6  1  0  0 
6=200 
6  =  300 
b^4  3  0 
bb500 
b  3o  0  0 

6  37  C  0 
b  3H  C  0 


:<  j )  =  ap  < I , j) 

c -  CALCULATE  COEFFICIENTS  of  R£ 

TERM  =  1  ,C/(  S(  J  l-S  «  J>  •  A  (  J-l  »  ) 

A(J)  a  A<  u ) *  TERM 

c<j)  a  < c ( j>*9( j) •; ( j- i i ) *te=m 

101  CONTINUE 

c -  cbt-in  new  phis 

SO  132  uJ  -  JSTAfi  T , ul 
J  a  JI*1- uSu 1-JJ 

132  ph I (  I  *  O )  -  j ( j) «PhI ( 1 1 J*i ) ♦: ( J) 

1C  3  CONTINUE 
RE  TuRN 


CuRRENCE  FORMULA 


s-j“pcj  r  ine  pf  :nt(  is  tar  t  ,  jst ar  t,m  ,  n  j  ,  i  t,  jt,  x,  y  tPhi 


6910  0 

:  I  WE  .NS  I  ON  rrt  I  {  I  T,  JT  )  ,  X  <  IT),v(jT),hEAC<9) 

.STOP  E( 49) 

6  92  3  0 

I  SKI P  a  1 

b  93  00 

JSKI °  a  1 

694  00 

*RITE(3*11C)  nE  A  C 

o  95  3  0 

ISTA  6  ISTAK  T  -  12 

a  96  0  0 

1  3  3 

C  3  N  T  I  N  v  A 

6  37  0  3 

ISTA  -  IOTA. 12 

b  9- 00 

ien:  =  ista-11 

b  99  G  0 

:fc,  i  ,lt.  i  end  :en:  a  n  i 

7uC  00 

«.fite(3*iid  (i*:  =  :sTA,iEN:-,isKiP) 

701  GO 

«r  I  T  E ( 3  *  1  1- i  (>(I),I  =  ISTa,IENS«ISkIF) 

7  02  GO 

-  F  I  T  a  (  3  ,  11  2  ) 

7  03  CG 

:c  i  j i  jj-jst ap t, ,  js<  ip 

7  04  C  3 

J  -  uSTART-NJ-Uu 

7  35  3  0 

CG  123  I  A  I  ST  A,  IE'.: 

7  36  3  0 

A  ;  Ph  I  (  I  *  j  ) 

7  37  G  C 

I  =  (  — "it  —  )  »  L  I  *  i.r.-tO)  “  -  0  »  j 

7  Gc  3  C 

12  3 

J  T  OF  A  (  1  )  c  A 

7  G9  3  C 

1  u  1 

«  4  I  T  A  C  3  *  1  i  3 )  J  ,  7  (  J  )  ,  (  E  T  OF  A  (  I  )  ,  I  r  I  :  T  A  ,  I  E,N 

: .  i  :k ip  > 

i  10  GO 

ifmen;  .lt.  r*  i )  so  t;  i;c 

7  110  0 

a  •  .  _  a  \ 

7  12  3  3 

1  1  3 

FJR'*AT  (In  3*  1  7(2n«-),  7  X  *  cA«,7*,l7(2n-«)) 

7  13  C  G 

111 

cC-MAr  il-I.llh  Ia  *12*111?) 

7  14  00 

112 

f  u  R  V  A  T  (  .  ►.  r  j  y  ) 

7  15  GO 

1  1  3 

c  3  -  A  T  (  I'  i3P’F8.5*  lX*lP’«12r5.2) 

7  16  3  3 

11- 

FOR1' AT  (iln  x  a  t:-.-iil;:.3l 

72-0  3 

725  C  0 

726  C0 
7  2  7  3  3 
7  2c  0  0 
7  29  C  C 
7  3  0  C  3 
731  CG 
/  12  CO 


‘  I  '« A  *  I  i  5 


l/u\7:  u  /=  a  :  -  -U  *\S  <»P  L*  ~  =  F  U  ,s  *rp'u<  4P  )  ,  X  P  WL<  4  e)  ,  S  EWu(4  A  ) 
1/JJlL/--  3  3CU  ,  NS..PV*  uF  F  V  ,  c  VNP  V  (  4  )  ,  Y  P  Sw  <  2-  >  ,0  NS  V  <  c.  4  ) 

1/  #i  7r  L7  -  i  3  3 "  a  *  N S  * p  W  t 

i  /  Pc:  «/  °:  0  3=  NS«PP,  LFFP  ,  u  -  ,  24  )  ,  sv  (  4  e,  2  4)  ,1  cc»  EF  ,  jr  F-r 

i  /  rf  AF  /  0  )  t  U  (  H  3  •  2  4  )  t  W  (  43t24)fp<'*6  *24)  *  PP  (  4  (*  *  I  4  )  I 

iTf  I  4  2  *  2  -  )  .  E  3  <  -  F  *2  4  >  ,STFN  «4  =  ,24»  ,YSTLN(4f  ,2“  )*  STVAL  i.N]  < 


/-  'I-- a 


7  3300 
7  34  0  0 
7  35  0  0 
7  3b  0  0 
737  00 
7  3o  0  0 
7  3900 
74000 

741  oc 

742  00 
74J00 
7  44  0  0 
7  4=  0  0 
7  46  0  0 
747  00 
746  C  C 

749  CC 

750  00 

751  OC 
7=200 
7  53  0  0 
7  54  C  0 
755  CO 
7  5b  OC 
7  57  CO 
7  5e  CO 
759  CO 
7  bO  C  0 
7  t>  1  00 


SUSTAR<4d*24),vSTAP<40,24),uSTARf4a,24>,FSTtR<4e,24), 

ITESTAR(4o,24),YGTLND<43,24),vISTAR<48,24) 

S/ALL/IT, JT.N  I,  NJ,MMl,NJI“l,0R£ATtJ1AX«46),JMAXP  1145) 
$/GE0M/I,5DC0:*X(43),r(24),2XLP<44),2xp«(44),'1YfiP(24),:ycc(^4), 

S  SNGt24>,SEw(48),XU(48),Y\/<24),R(24>,RV<24>, 

i  .FM:4)tMFc(:4)i»Ft;(43),jFxi43)li''cvti4),x>c(4o),«vY:f43) , 

SY  NC  (  24  )  ,  Y  (24  ) 

C  Q“M3N 

t/FLLPR/oRFVlS.i/ISCaSt3ENSIT,PRA'.2T«:E\i48,24)tWlSC4P,24) 
i/*ASE  Tl/Ul%,T£;iMtP:iN,FLOWIM,ALA«OA, 

t5SMALL.6LAPGE.ALl.AL2.JSTEP.  I3T£P,JSTPl,JSTHl  .  I  S  TP  1  ,  I  5  T  ”  1 
i/SUSP/5JK2(H8.24),5PK? (46,24) 

i/TUPt3/&C:4(46,24),C0,C4j,Cl,C2,:APPA,ELufc,PPED,PRTE 
S/WALLF/Y  PLUG  5(4-  )  ,xPLlEu(24>  )  ,  T  AU  W I  24  ) 

i/C0EF/AP(4-,24),AN<45»24),AS<4-,24>  ,  A  £  (  4  4  ,  ?  ;* )  ,A  W(4  5  «J4  >  ,  3  0  l  4  4  ,  ; 
t of (4  8,24  ) 

IF(.*,CMAP  .  C  , .  2>  GO  TO  1150 
I  p  (  0  5  T  £  p  ,r~.  r.jMl)  GG  TG  115C 


IP(.*,CmAP  .£,.  2)  GO  TC 

i  p  (  j s t £ f  .re.  r.jMi)  gc 

- QuT  OF  R  A  *;  G  E  VALUES 

:  0  i  1 C  0  1  =  2 ,  M 
IF(J*4AX(I»  .£0..  \J“1> 
JJ  -  J-MAX  =  1  (  I) 

:o  lioo  j  =  jj, gj^i 

G  P  (  I  ,  o  )  -  -  3  1 1.  A  T 

CCNT INjE 

0  0  TO  (1  ,2, *,4,5,6,  7,  : 


GO  TO  Ur! 


762  00 

OAF  T£ 

4  1  i  1  pepper  tie:  1  1  1  1  1 

7  63  C  0 

7  b*+  0  0 

c 

765  CO 

1 

CC  NT  I'.UL 

766  00 

c - »  -  - 

- NO  *■*  G  "  I  f  I C  A  T  1  0  *,  S  FOP  THIS  P=OPLEM 

767  C  C 

9  £  T  „  R  \ 

7  oc  0  0 

c 

7  <s9  0  3 

0  a  f  r  r. 

4  2  L  2  2  2  J-YCHENTUV  2  2  2 

7  70  0  0 

c 

7  71  C  0 

c:\t-  .0 

7  72  CC 

c - 

*•  viz  f  -  -4  i  G E.  »  L  J  1  j 

7  73  C  0 

IF  (  u  2  T  £  H  .  L  0  .  14  J  “  1  >  GO  TO  2  3  2 

7  74  0  0 

-  0  C.  3  L’  i  -  /  *  « I 

7  75  C  0 

I  F  1  J  v:  *  (  T  -  1  )  .EO.  ..JJ1  )  GO  TO  222 

7  7b  C  0 

OJ  =  1-1  ) 

7  77  0  0 

EC  2  0  0  0  4  JJ,’.JU1 

7  T-  0  0 

S  p  <  I  ,  J  )  =  -T-CAT 

7  79  C  C 

2  n  C 

:o\t :vjc 

7-G  C  0 

*1  ~  c 

cC\r  i‘«ww 

7  4  13  0 

c  -  -  -  -  - 

■ . -T.P  «ALL 

7  52  0  0 

CCTf  4“  ;  :Yv**C.25 

7  63  CO 

:c  21c  :  4  ' , r« i v  1 

7-4  c  C 

\J  —  jf1*  l"l  ) 

7  45  c  0 

yp  =  Y  J ( J ♦ 1 )  -Y(J| 

7  56  0  0 

SC  4  T  4  :  2j-T (0.5*(TE(I,J)*TE(I-1,j)  )  ) 

74  7  C  0 

CENG  =  : . 5* (  EEN(  I , J )*DEN(  1-1 , J) ) 

/  c  c  0  0 

yplv,sa  =  ;.t(ypluGG(I)*ypljSN»i-1)) 

7  89  c  0 

IF(YPLJSA  . l  E .  11.62)  GO  TO  211 

7  90  00 

T  ”oL  T  4  2£-,u  *C2  T£RM.  $  CR  TK  *CAPPA/ ALU  G  (  ElCG  *Y 

791  00 

SC  T  0  2  12 

/  92  C  0 

21  l 

TMjlT  =  VlGCuS/YP 

793  C  0 

21  2 

C  0  N  T  I N  ^  £ 

t 


794  00 

795  0  0 
79600 
7  97  00 
7  96  0  0 
7  99  C  0 
b  00  0  C 
i  0 1  0  C 

4  02  0  0 
a  33  C  C 
3  04  c  0 
3  0500 
a  06  0  0 
c  0  7  0  0 
a  Oc  0  0 
3  09  0  0 
3  10  C  0 
a  1 1  C  0 
s  12  0  0 
3  13  0  0 

5  14  0  0 
a  15  0  0 
a  16  C  0 
a  17  C  0 
3  16  0  0 
r.  19  0  0 


205  SPC1.JJ  a  $P< I, J) -TKULT*SEWU( I) .«V ( J*1 ) 

Ic(  J-4X(  I-n  .NE.  JMAXdl)  S  F  (  I ,  J  )  a  SFtI,J)/2.C 
210  A  N  ( 1  ,  J  )  a  0.0 

- SIDE  .(ALL 

IC<JSTE°.  ED.  \  JM  1 )  GO  T  0  214 
20  225  I  =  3  .M  Ml 

IF<oMAX<I-2,  .  GE.  JMAX(I-I))  GC  TO  225 
JO  a  JMAXF1 ( 1-2 ) 

JI  =  JMAX(I-l) 

0  c  20  J  a  j  J  ,  j  , 

•*  "  (  I  ,  J  )  —  u  .  u 

223  CONTINUE 
225  CCMIUE 

-  5r«VETRY  AXIS 

214  CONTINUE 

2  0  2  0  3  I  a  1  , r.I 
203  A  S  (  I  ,  2  )  ~  0*3 

- JuTui.! 

ACCENT  a  C.C 
FLO-  a  C.c 
20  tQ9  J  a  2  »\JM1 

FFJED  a  2  .S.  (CEN<  M  Ml ,  J)  .;£\c  M  mi-1  ,  J)  J.3CV(  J  ,»SNS<  j> 
A® Cl  NT  a  ACCENT. ARDEN 
233  ’-LG-  a  clC-*A92EN*u(NIm1,J) 
jI3C  a  <  F  LG- IN-FLO  W  > /A4  CE  :,T 
CO  215  J  a 


a  20  0  0 

215  -  <  N  i  ,  u  )  a  u ( N  1  Ml , J ) *  j I \ C 

32100 

FETt  =\ 

a  22  CO 

423  0  3 

r 

r-  A  P  T  t  P  }  5  3  V - M  C  y  E \ T  v  M  3  3 

a  24  0  0 

c 

5  25  OC 

3  20\T  :*;vr 

a  26  0  C 

r 

L 

a  27  0  0 

IF  <v  STEP  .  EC  .  ^  1  )  Go  TC  314 

a  2o  0  0 

C  C  T  E  5  u  a  C  ’’Li  *  •  C  .25 

4  29  0  0 

CO  3  25  :  a  LOt^l 

a  3  0  0  0 

I  F  (  v  M  A  X  <  1-1)  .GE.  0 A  x  »  I  )  )  5  J  Tj  32 

-3100 

JJ  a  J  v A  X  F 1  c  I - 1  ) 

=  32  CO 

J  I  a  J  M  A  X  (  i  ) 

a  33  C  0 

-C  1  J  -  JJtJI 

a  34  C  0 

XF  a  X ( I ) -Xo < 1 ) 

a  35  C  0 

g  g  p  t  k  = 

a 36  CO 

CEV0  a  3 . 5«<  DEN  (  1  ,  J)*CE  5(  I,  j-l  )  ) 

937  00 

X  F  L  L  S  A  a  3.5 • < XPLUSWl J) *X FLJSU(  J- i  ) 

a  3o  0  0 

if<apl„ca  . le.  1 1 . s 3 >  r-r,  to  311 

a  3?  C  0 

T^JLT  a  C ENV • CC TEPW .COR Tk .CACPA/ALOl 

a  4Q  c  0 

GO  TO  312 

441  o  C 

3  11  T  w  UL  T  a  v  ICC  OC/ x  P 

a42  CO 

3  12  CENT  IN^C 

343  0  0 

3Cb  5P  (  I  »  J  )  -  GP(  I  ♦JJ-TmOLT*3NSV(J)*-JV(J) 

344  GO 

Ic(o  .EC.  JMAaPKI-1))  SFCI,J>=  CF( 

-  45  a  o 

3  1  C  A  a  (  1  t  j )  -  2  •  C 

•5  C  C 

32C  CONTINUE 

4  4  7  0  3 

325  CONTINUE 

a  4o  C  0 

c- 

-  TCP  -ALL 

3  45  0  0 

314  CONTINUE 

5  5C  0  0 

CO  313  1=2, NI«1 

o51  CO 

J  a  JM  A  X  (  I  > 

0  52  C  0 

313  A  N (  I , J  )  a  C.C 

a53  CO 

P '  T  yj  *  r « 

854  00 

c 

35.73 


r\  V  S 


355  00  :  t-  A  P  T  C  ^  4  4  4  PRESSURE  CORRECTION  4  4  4 

9  56  0  0  C 

3  57  00  <•  CONTINUE 


3  5e  0  0 

c - 

—  S  ICE  -IlL 

659  30 

IMjSTEP  .EC.  NJW1)  CO  TO  414 

-  60  0  3 

CO  4  12  i  -  2  « M  M 1 

3bl  00 

I  c  I-i  >  .C-E.  jyiX(l>>  00 

6  62  CO 

OJ  3  JHi«51II-l) 

4  60  C  0 

j  i  3  j mr  x  ( : ) 

3  04  0  0 

- G  4  1  G  j  —  J  Jt  J  i 

3  b5  G  3 

M  N  (  I  f  J  )  “  U  •  U 

3  66  0  0 

4  1  0 

C  C \ T  I N  l  £ 

-  67  C  0 

*♦12 

C  C  N  T  INuE 

i  oc  C  C 

2-- - 

----TOP  ««LL 

3  69  0  0 

H  1  4 

CONTINUE 

3  70  0  0 

CO  4  C2  I 3  C , N  I'M 

4  71  0  0 

j  3  J4 i»  (  ; ) 

3  72  C  C 

**  w  c 

*  <  (  1  t  U  )  —  u  •  u 

3  71  CO 

z  • — -  -  * 

3  74  0  0 

C  0  4  2  0  I  3  :  ,  SI  1 

-  75  0  0 

R  3  <  I  1 2  )  3  ;  .  “ 

3  73  0  0 
3  77  0  0 

-  73  0  0 

-  7?  C  0 

-  o  0  C  0 
3-1  CO 

3  32  0  0 

4  65  0  0 
co*  C  G 

3  3=  C  0 
3  3600 

3  c  7  C  0 


-  2  C  COM  1:,.l 

C  —  —  —  —  —  —  —  —  u  u  Tt,  l  T 

CO  4  4  0  „  3  2  ,  W1 
RE  ( •.  IM  .  u  >  -  0.0 
4  h  C  C  C  N  T  1 N  „  3 
R  E  T  w  R  ", 

;-;crr5  4  -  -  t-ERwru  " \ r R  ' y  5  5  s  5 

C 

b  COM  INwL 

: - nq  wc : r  tic.c  =  >  this  rro-le« 

fi  E  T  u  8  N 


C  3  3  0  0  C 


-.3900 

0-RP  T 

L  c  6 

b 

T  ^  :  l  L  L  \  ^  *  I  \  £  T  I  C  -  ‘J  l  *  O  v  t  t  L 

j  90  ca 

z 

-  0  0 

'Z 

332CC 

c 

<wO\T  I  «w 

i. 

ERiCC 

c  ---- 

- TP 

«*lL 

394  00 

CUTS-'* 

=  :  ■  - 

«»0 .2  5 

3  95  u  0 

CO  p  1  3 

:  -  *■ 

•  N  I  •-  1 

~  30  U  0 

u  :  _ 

At!) 

Z  7?  C  Z 

_  *  2  r  = 

<  *  <  I  * 

o ♦ 1  > - W  <  I  ,  J -  1  )  ) / 1 C  Y N P ( J )  ♦;  YF0  (  J>  1 

3  5c  C  0 

„iJS-  3 

^  (  i  *  J 

)*V.PE(I>*U.C-«REtI))*o«  I  *  1,  J  ) 

-  95  0  3 

1  j  f  C  F  C 

. ;  - T  t 

ur  v  *• » u  4  j  r,*  a  « :  ,j)»4( j>  > 

3  OC  C  0 

TP  3  Y  ; 

U-i) 

“t  l  w  > 

"  0  1  o  J 

„  i.  '*u  - 

_  L  C  I 

♦  J  ) 

5  02  00 

S  0  S  T  K  3 

^  ;;t 

( TE  l  1  iJ >  > 

*5  0  3  o  0 

J  0  L  3  = 

'  0  (  J  ) 

•  CMfJJ.SEMI) 

5  0*  0  0 

YPU-CM 

*.)  3 

-ENJ.SCRTX*CCTE3«*r9/olSCO- 

=  05  C  0 

IP  <  Y  PL~ 

(  I  ) 

.LC .  1  1 .65  >  CG  TO  6  0 i 

4  06  0  0 

T'^lT  3 

Z  £  .  w 

•  CC  TER4«S  .R  TR  *CRrPR/iLCG  (EuCC-*YPLUSN<  I  )  ) 

907  0  0 

t  r  „  ■.  < : ) 

-  -  T 

'•'UL  Y.  ur  pp 

30c  00 

S  I  T  E  R  v  3 

i 

tu)*(C'*^**0.76)*jGRTx.RLGGtELCG«YPLvjSN<I))/l 

9  0  9  C  0 

00  T  Z  o 

„  - 

9  13  0  0 

60  9 

T5„M  3 

•  J  i  1 

wOC 

911  CG 

T  R  U'R  *  3 

vice 

cs» <  -*<  : , j > /yp-u ( i , j)/y (  j)  > 

9  12  0  0 

T  **  o (  1  ) 

-  w  ^ 

^  7  <  T«u^x*  *  2  ♦  T  *  j  ^  a  *  •  «.  ) 

9  13  0  0 

: I TL  RM 

-  '  ib 

(  I.U>  •  (  CMu  •  •  C  .75  > •309TK •  YPLLSNl I  )  / Y  P 

914  00 

6  C  ? 

CoCy  3 

( ( .  ( i 

»J)*o(I*l  I  ♦  1  «  J  ♦  1  >)/<*•  0  - 

9  15  0  C 

J  (  u(  I 

«  J  )  ♦  . 

(Ml  J)*olI*J-U*U(M,d-l))/4..»/S;.StJ) 

RPPR  «y  p  ) 


33 


i 

! 

» 


« 

* 

I 

I 

« 

b 

r 

» 

f 

7 

3 

i 


3 


< 


JMf/ 


<*«• 


9  ltj  0  0  GENCOU  =  TAUN<I>**2/VIS«I  .J) 

9  17  00  GENRES  =  GE  N  (  1  •  j  ) -V  I S  (  I  .  u  i  •  (  C  uC  y  •  •  2  ♦  i  D  -2  Y  <  I  ,  j  >  /  »  « .  )  )  •  ■ 

9  18  0  C  3EN<ItJ>  =  GENREG-GENCCU 

91900  3  U  (  I  .  J  )  - 

92CC0  SP  (  I  *  J  >  =  -C  I  TEC  M  •  V  0L«  G  P<  C  (  I  .  J  ) 

9  21  00  i\< 1  .  J)  =  0. 0 

92200  falC  CONTINUE 

7  23  00  TAu\(NI)  =  TAuMNI“l) 

°  2a  0  C  C - SICE  -ALL 

9  25  00  I  F  (  j  S  T  E  p  .EG.  NoM  1  )  C-C  TG  6 1  a 

Q  26  0  D  CO  b  25  1=2. NIM1 

9  27  0  0  IF(o«A*(I-I)  j.MAX(I>)  G  J  t;  325 

=  2-03  JJ  =  j»ixFlt  l-l > 

929 00  Jl  =  J  M  A  K  (  I  ) 

9  3  C  0  0  CO  6  2  0  J  =  JJ.JI 

73100  C«Cx  =  t«(I.l.i/)-«(  I"1  »  J )  )/C  CM3-!!  )  *  C  *  EF  (  I)  ) 

93200  V  -  V  6  r  \MlfC>*-FN(.J)*il«r~-FN«u)).0<I.v*ll 

9  33  C  0  V  E  F  F  7  O^TIKJVC.iKiv;  *  »(I.J)«.<I.u>> 

9  37  00  »T  XCI  -  KIC) 

7  35  0  0  CENV  =  CE  I  ,u  ) 

53600  GO-T*  r  S,5TiTE«I,u>> 

9  37  00  VOL  7  =C v (u) *CNS( o )•;'.<  I  > 

93800  x  P  Lu  0-  (  J  )  =  CENG*  CGR  T«*  CC  T- «*  »P/V  IS  COS 

53500  IF(XPL„.-(J)  .LE.  11. u3>  GO  TO  -2i 

5  a  0  0  0  T  yuL  T  7  ClNV.C3TL-v.C-''Ta.wa.fa/AuGG(ElC0  .ARLuC-lu)) 

99100  TAu„<j)  7  -Tx,uLt*  vEcp 

99200  ~ ITE  Ru  =  crN<  I , J> • t  C^S • *  C . /5 ) • C  G5  T* . GlEL  CO.*  PL -5  «<  j  >  j  / < 

7  a  3  C  0  G  G  T  J  1 2  2 

?  AA  C  C  6  C  1  TAOX  =  =  V  ISCGC.  VAVG/MF 

9A5C0  TA.x-  7  v  I C  C  G  C  »  » (  I  *  J  )  / x . 

9  •»  6  0  0  Ti'j„(j)7CIsT(TAv.x°«*2*TAL;X-*.2) 

7A7C0  CITE - M  7  _EN< I , o ) • (  C*. • *  0 . 7C ) • C 0 5 T x * xPt. C -< „  >  /« P 

9  A  - C  0  62  2  CUCx  7  ( ( V(  I (u) • J l I , J«1  )«U(I .1 . j i«V  (  I  «1  ,  J.l  i  i  /k  .0- 

5  A  9  0  0  %  W(I,0)7v(l,J*  1)»\/U-1.  v)«»(I-lt.*i))/A.D/SI.t:) 

75000  up'.uCl  —  t-l-( i.j) 

7  0 100  GENRES  =  Gi_N(I.u)*VIG(I»u)*(CVCx*»C*C«.wl«»*2> 

9  o2  0  0  GEN(I.J)  =  G  E  jc  E  C  ♦  0 NC  O  . 

953  00  SL'(I.u)  =  CU(  :.u)*SsxC(  I  »  J  >  ♦  G  E  N  <  I.J)  •  V  CL 

5  5a  C  0  Sr(i.u)  =  CP  (  I  ,u  )  *GFxC(  I ,  J)- C  I  T-C5  «•  vCL 

355 00  --(I.J)  =0.0 

) 56  0  G  620  CONTINUE 

73700  buu  CONTINUE 

7  5c  C  0  TAj-C.j)  =  TAJ-(NJMl) 

5  59  00  C -  o  v  7  •/  r  t  A  r  AXIS 

560  0  0  6  1  a  CONTI’,.;: 

961  0  C  J  =  2 

7o2CC  .  O  6  3  j  i  =  *.  .  N  I v'  i 

R  b  3  0  0  CuCT  =  ((LtI,J)»u(I»i.J)..(I.j7l)»J»I*i.J*l)>/A,C- 

56A00  T  < .<  I.o)*L<  1*1 .J)»u(I.u-1)».(I*1.u-1))/a.C)/0NG(J) 

9  65  0  0  VOL  =  RCV < J>  •  SNr ( J) *SE-  (  I  ) 

9  6b  00  GEN(I.u)  =  G  7  N (  I.j)-VIu(I.J)*ujCy..2 

9  b  7  0  0  Su(I.J)  =  Cu KC (  I  • J ) ♦ GE N (  I  .  J > • UCL 

96700  63  0  A  S (  I  .  2  )  =  0.0 

5  b7  0  0  0 - CuTLET 

7  7C  C  0  OOuAO  J  =  2  »  N  J  1 

5  71  0  0  AElM’M.u)  =  G.C 

5  72  00  6  a  0  CONTINUE 

973  0  0  RETu  =  N 


7  7a  0  0  C 

9  75  C  0  CiAFTES  7  7  7  7  .ISSIPATION  7  7  7  7  7 

9  76  00  0 

35.75 


He  0  0 

onca 

9-0:0 

9rl  GO 
9-000 
9  -J  00 

^  -4  : : 

9  a  -  0  0 
9  -  o  0  0 
9  c  7  C  0 

9  07  0  0 

<=:cc 

9  91  0  0 


9  ■?*  0  3 
7  95  0  3 


7  l  cnt  :\or 

- TOP  H4U. 

:0  7  10  I  s  2  ,M“1 
J  :  jMfix  <  1  > 
v  p  -t  j  (  o*  1  )  -r  ( o ) 

T  E  9  M  -  (vl  Ml  ..0.75  )/(CiPP4.V=| 

0  -  t  I  *  J  )  =  "oCiT«TE9!“*Tr<I»J)**1.5 

71  C  S  P  <  I  *  J  )  =  -C-PEiT 
- 013E  .4lL 

IP  <  j  ST  l  P  .  lC  .  \  o  m  1  )  GO  TO  71m 

:o  725  ;  =  2..‘.i“i 

:p<jm£x<i-i>  .:-r.  jm  ax  ( 1  > )  go  tq  705 

O J  -  jM-Xri( 1-1) 

J  I  =  o  M  -  X  (  I  ) 

*-•4  723  l  —  JO*  J  I 

ir  <j  jMfixii))  go  to  7 2 c 

XP  -  X l I ] -<v( I) 

Tfp."  7  <  C  ml*  *0.  75  )  /  l  CfiPPfi  .XP  > 

Cl(I.J)  =  G=rfiT.TPfiv.TC<I,J)**1.5 
op  ( : .  j)  - 

7 2  4  ::m  i  <4-. 

7 : 5  c  c  %  t  r,  „  l 

- ;yMMPT  =  Y  fix  is 


T 


n  —  w  -  w  w  ■u—  w 


R- 


. 

■. 

m 


M 

B 


i 

£ 

v 

g 


i  b<  0  0 


5u  rR  OU  T  I  N  E  STRMFN 


3  63  0  0 

C 

3  64  0  0 

r 

J  65  0  0 

L_ 

nAPT'.!?  Z  0 

w  bb  w  C 

z 

3  67  0  0 

Z 0*M0N 

J  t)fe  U  C 

i/ovEL/RES 

«  b^>  G  0 

i/y  At</u(**3 

.  70  0  0 

i  TL  ( <♦  r  ♦  2s  ) 

3  7100 

i u: Ti R ( 4  - , 

-  72  : 0 

STE  STAR  <  48 

-7100 

i/ALL/IT,  J 

:  74  c  o 

t/geum/in: 

3  75  u  0 

i  :\S(c4 

-  7b  C  0 

b  m  (  t.  4 

;  7T  c  o 

i  y  \  c  1 2  4  i ,  r 

■  7:  Gu 

S/h  age  ti/ 

:  7=  o  o 

i ROM  all  L 

.  “  j  C  G 

S  /  P  L  G  T  T  /  •„ : 

0  ;  1  0  u 

LOGICAL  I 

j  “  2  C  0 

z 

.-.3C0 

chapter  i  l 

.  -4  0  0 

z 

ALC.LATE  3  T  p  E  a 

7  -5  C  0 

r 

;  -b  C  J 

1  R  Li \* < 

.  -i  7  C  0 

.0  4  C  0  i 

-  re  C  C 

IF  |."A»(  I 

J  55  C  0 

C  TF  .(1*2) 

7  =0  C  0 

JJ  :  J v -  X 

.  J 1  0  0 

-  ^  ^  . 

Vv  twij  J 

j  92  0  0 

c*TF  i  (  |  t  v  ) 

■  P5  0  0 

2  3  3  COM  I ■  •  ^ E 

3  >4  C  0 

4 .  c  comi\  wL 

.  iz  C  3 

z 

.96  00 

-  '-w  -  3  C  i 

7  5  7  0  0 

:  j  -  j  ■•'  a  x 

'  7c  3  C 

3  u  7  0  0  - 

.5900 

AH  =  H  - 1 

1  00  C  0 

C  T /A  L  ■  H) 

i  oi : : 

J  J  R  J  M  A  X 

I  02  0  c 

>.  j  L  uC  -< 

i  :i  c  o 

ip  «: t- .<  i 

I  74  0  0 

6  3  T  C  j  M  I '« yji. 

10503 

H  7  T  L  5  (  :  .  4 

1  3d  C  C 

GO  TO  fa/. 

1  j  7  >„  w 

•.  = :  ici.  .... 

1  3=  C  0 

I  c  ( v.  .  E  • 

.  „  ,  ^ 

C~  \  *  — '  —  _  . 

A.  J  1  w  U 

i  1 0  0  3 

T  C  T  l.  (  I  t  s 

:  ii  c : 

fa  7  3  CC.T  ['..E 

1  12  C  0 

y  oTlV (  I* 

1  1300 

fee  C3-.T 

.14  0  0 

r  Z  0  w  3  ''i  T  i  .'■*  w  - 

1  15  0  0 

z 

:pi  .  v.  t 

1  16  0  0 

•.  =  0 

1  1.7  C  C 

CC  730  «R 

11:00 

f  =  I 

1  15  C  0 

CO  730  I 

1  20  0  0 

r.LJLir.. 

12100 

733  CONTINUE 

1  2c  0  3 

CC  740  1 

0  PRELIMINARIES 


iLE(‘»e«2‘*>«STFN(4R,2<*>>vSTLN«<*t  >24)*SToAL 
:4>.'JSTAR(4b»24),*STAR14fc,24),FETARl4b,24 
.24),YCTL‘.C(48,24!,VISTAR«4flt2*> 
r  *  *.  ),jFt  >PHt 

:o:, *<«->, r<:4i,rxEF(4->,''AF..<‘<-;>,:vr,  pi  2* 

!  *  :  ?  «(“R).xj(4c>*'rU(24),;!<24),Fv(24)  * 

'  *  -  P  -  (  .4  I  t  *Fl(  Ma  )««E4i4^)  «  A  C  4  it.4)  .  » ?*  .  (  4q) 
;‘.C  c2  4  ) 

, te :  \  ,et i*j, flow: \  ,  iLAMc-t , 


.npltln.'.ft: 

LOT 


'  E  L  P  L  T  i  1  C  ,  4  <•  )  ,  x. 


v'.C  T  I  ON 
ALL--2)/: 

!'i 


V  »  -i  Z.  -  u 


\  VCL^MlTR  ic  plc- 


/ll«j))*  «-/ 


R  l 


■C  .1 


-  .  *  .  J 


.  i  <■  c  t  l  •.  i  i ,  <  >  =  r .  o 

.  >  sc  r  j  7  : 

:T  /  AL  TP  M  I,  J-;  )  )  /  (  :T>-  .  (  I  ,  a)  -C  ’r  M  !.  J- 


)  ) 


.  M  v  1 


35.78 


£3 


vV 


m 


4  ) 

4 

« t  * 

r< 

«  .  4  )  , 

>  t 

i-  ■! 

fa  ) 

>  t : vc ’ <  24  ) , 

ii 

“ 

•  * .  \ : « 4  a  ) , 

i«  re t*i 

r'Z 

I  *.  P  L  O  T 

>'  l'  4  •  N  *  /  Y  SN  *  *.  i  ^  6  *  14  -  -  J  ^  - 

•  .f-  V 


t 


y  r  r  r 


r. 


5  Ob  0  0 
I  0  7  0  3 


'  ?  =>  3  G 

;  i  : :  a 

■  n  :3 
i  i:  : : 
;  i  :  c  c 
:  l  *  c : 
5  1:;; 
;  it, v : 

;  1  7  C  3 

i  -  c : 

5i7:: 

■  c :  o : 

s :  l : : 


5  <;?  :  3 
5  5  J  C  3 


5  310  3 

5 7; ;  c 


;  5;  ; ; 
'  3b  C  3 
5  5?  33 
5  55  3  3 
5  57-3 
5  -  w  3  3 
' -i :: 
5  -2  0  0 


5  »t> ;  3 

;  -  ; ;  3 


.  j 
'  3=  0  3 
5  ;o  C  3 
5  5>  7  0  C 
5  3-  C  C 
5  ;  7  C  3 
3  b3  0  3 
5  bl  00 
5  62  C  3 


5  6-00 
56;  00 
3  6b  0  0 


3L  5  (  ) 
it  ( 


:l:  <  > 

<  > 

l  .  i :  < 


(  > 

l  M  T  < 


I  <7 1  speed  of  the  <ias. 

3  7>idl  velocity  of  'j  a  s  . 

Itlal  radial  speed  of  croclet. 

<  radial  velocity  of  croplet. 

3  radial  velocity  of  droplet. 

3  1  a  l  velocity  of  >;  a  s  . 

;ial  speed  of  the  jd$. 

3  radial  velocity  of  lias. 

)  r  3 1  n  a  t  e  s  of  lo«?r  left  correr  of 
itlal  n*1al-cDard1oate  of  droplet. 

•  dl  i  H  location  of  droplet. 

3  j i i  H  c  dt  1  on  of  iroplet. 

“  --cells. 

i  tiul  rjrjiai-coorjin  jte  ot  jrjplet. 
I  radial  location  of  TrOplet. 

3  r  ai:  i  a  l  location  of  iroplet. 


/.-v=;/  '.pjii. 

-  e .  c t : ;  > .  .  -  p  1 1  c  <  i  _  >  t  .  - M :  o  t  t ;  3  > ,  ;  =  i  =  •. 

■ :  i  •. ;  t  ( ;  -  > ,  * :  i  %  i  t  ( i -  > ,  ’ :  i  m  r  1 1 : » ,  „ :  i  m  t  <  i : ) ,  •.■jinitii 

i-i-t.i,  t-i--), 

,  3 1  .  -  i  .  a  f  -  '  t  (.  —  It  .  j3((  i  i  '  t  2  —  )  t  V  t>C  i _ (f*et  (*)t 

_  .  .  --(A.  I-  -  C  j  v  t  -  i  ..  t  -  n  u  3  C  .  *  lit  o  *  —  -j  t  *0  53  t 

1  -  3  l  3  t  '  ’  /l.  i  *  ~  3 1  3  t  1 1  ~  3  L  -  •  V  .  0  L  :  t 

.«c.tt  '  .  Mot  T  a  t  o  5'v  _  m  t  i  (  'e  t  i 

.  T ,  .  T  I',  ;  ,  -  H.nL  , 

i  *.  r  c T  - ,  i'.;;;,  1-17,  *»a«  :tp-.  -a.;*. 

:  t  j  :  1  is  t  0  7  *  i-t  j  - 1  iPt  j  - 1  1  "Ci5 1  j’vL^t  1 : "  . 7 1 

.30.it  ,!3  . .  5  1  j.  --.(-ilt  t.It  7-o 

,  a  *•  C  /:-'-i/CM-''U<,5  3t63>t-'';'io«53t5C» 
l'-‘, - 

1'.  t  _  . .  *  ^  ( :  > 

1  :  .  :  (K-'T  s  '<i  *P0» 

i  t  e  ;r  j  t  e  for  “  a  C  n  port. 


Initialise  parameters  tor  -rop. 
<  3  0  _  3  -  »'l7iT(‘<frOST» 

y:i„:  =  7 ; ;  ■. :  t  <  vp?- t  i 

T ;  ; -  -  1  T5 ;  .ITC.P3  =  T) 

•  1  t  <  *,po=  r  > 

t'.i.:  -  «'i'.iT('.r3-T) 

< :  :  <*!•.: 7 ( '.p"= 7 1 

y  I  ’>  c.  a  d  »-».IT(.Pj-T) 

TV.c  d  T  .  I  •.  I  T  1 ’.P3- T  1 
-.'.5  a  d  ,3  T.  I  T  (  '.r;t  -  ) 

j;1.-:*  d  r  i\  t  r  1  \p->  t  > 

-3-  d  .  ,*r-I-f*|Pj',T)/3.C 
-eap  c35  ’.('(C3"Tl 


Initialise  counters  and  fldcjs. 


I  n  i  T  ; 

IMH. 


Initialise  :  ■■  ,  J-,  I  -  t  (iCt  lot  Jit  IV  arcs  J  J . 


A  .*  . 


3  b7  00 
3  6s  CO 
369  C  0 
3  ro  CO 
3  71  CC 
3  72  CO 
3  73  CO 
3  79  0  0 
3  75  CC 
3  7b  0  0 
3  77  CO 
3  7:  00 
3  79  CO 
3:0  00 
3-100 
3:200 
3  :  3  G  0 
3  a  *+  C  C 
3-500 
3  -s  0  C 
3:700 
5  :  e  0  0 
3  -9  C  0 
3  :  0  C  0 
3  9 1  C  0 
3  92  00 
3-300 
3  »<*  0  0 
3  a-  0  0 
3  io  C  0 
3  97  CO 
3  Jr  0  0 
3  9900 
<•  00  0  3 

-  0 1  C  0 
•»  02  C  0 

-  03  0  0 
«*  09  C  0 

-  0  b  0  c 

-  0  7  0  0 

-  Oc  0  C 
9  39  0  0 

-  10  CO 


CALL  r I NUb 

Initialize  Croo  »o»entu*  source  term  at  injection  point 
I  I  :\PU9  T 

2tLTA=9.0.PI.9HOL«SA3**3/3.C*39FR£GiII> 
9«o“hi-,ju)=:elta.udinit<ii) 
p“:“vcv,jv)  =  :elt£.v::mt(ii) 

I  5  CL 3  =  lb 
ui Cl3  —  Ob 

CONTI  NOT 

N  e  «  integration  step  starts  n  e  r  e  . 

-  j  A  3  —  U  G  t  I  o «  O  —  ) 

7  0-  9  0  -  7  C-  <  I  V,  o7) 

-  ~  »  7  '  nr 

-eturns  here  for  reintegration  if  the  time  step 
■us  incorrect. 

C  2  L  L  -  u  \  G  A 
CAi_u  2Gb.  Ce*. 

IF  (  I  n  I  T  .  \  F.  .  0  )  T  H  £  N 

«-  I  T£  (5.  *)  ’  OC^CW:  1  -9 1 T  =  »,  1HJT,  »NPORT  p  *. 

~  ■  y  rj  r  »n 

£  n  :  i  f 

call  r  I  ’  2  r 

-  “  Ll  hi  :  ■  -  L 

I  -  <  I  —  I  T  .  N  £  .  0)  T  r*  r  N 

«-  I T  £  <£,  •)  •  ilTaAt:  I n I T  r  »,  ibIT,  »NPC)RT  -  *, 
MC  9  00 
C  N  2  I  r 

Call  2TPC«* 

IF  (  r.TFLG  .NF.  C)  T  r,  £  N 

-►-integration  is  require::. 

I  .TCT=  p  INTCTP  *  1 

:r  <  i *. t c t -  .or.  20  tmfn 

»  -  I  T  F  (  5  ,  •)  •  TOO  MA\r  9  FI  NT FGF AT  IONS • 

*  -  I  T  £  <  5 •  *)  *  N  P  0  F  T  .  •  ,  N  P  C  P  T  .  *  x  p  X2  OL-  , 

•x  p«,  Y20L2.  •  ICJcNT  r  *,  ICCUNT 

I  p  <  IN  T  P  L  G  .  £  ",  .  I  )  Tor.. 

■  9  I T  £  is.  *)  *  T  1  b  £  2  T  -2  P  TOG  LARGr,  2T  p*,  IT 
-=IT£  (5,  •>  ’  INPUT  N  F  a  TI"t  CT£p* 

FLCF  IF  (  I-jTflG  .ro.  2)  TnF. 

j=:t"  (5.  *)  *  :  t  £  p  too  o  vall,  ct  =•,  -r 


9  11  C  0 

■  e  I  T  £  (5.  •  )  *  I 

9  12  C  0 

if 

9  13  0  0 

-  £  A  C  (  F  ,  *  )  "  T 

9  1-00 

I  ‘.T£  TP  P  c 

9  is :  c 

l.-IF 

9  lbC  c 

;  -  T  0  2  0  0 

9  17  00 

e ip 

-  1-  0  C 

:\t;t~  p  c 

9  19  C  0 

2A-^  F  1  *,  2N 

920  0  3 

:alu  finov. 

92100 

*-  I  T  £  (  2  -  i  *  )  ’  2-  GF  l  »  ,  X 

9  22  0  0 

i 

X2NF*,  T  2  NF  «  ,  T  CNF  a*  U  21 

9  23  00 

1 

-T,  -TINC,  3T=£2, 

9  29  0  0 

i 

I2T£r-3,  INTCTP,  IFLAG2, 

9  25  0  0 

\ 

I  -  ,  uC ,  17,  OV,  I 0 ,  JJ, 

9  26  0  0 

l 

NCACF,  VC  ACF 

9  27  G  0 

c 

9  2o  C  0 

Ir  (NCACF  •  l  0  .  (■)  ThFN 

*  2900 

I  TE( 5, 

*  JO  0  0 

or  op 

*  31  GO 

L'.-IF 

*  32  0  0 

c 

*  33  C  0 

i r  <«:iC5  . 

*3*  CO 

IP  C.OPOC 

*  35  0  0 

c 

.'-cel  l  *e*-t 

*  36  0  0 

x  1  =  iZ 

*  37  0  0 

X  2  -  x- 

*  3s  0  0 

x  3  -  »: 

*  35  0  0 

yi  c  t: 

*  *  0  0  0 

7  2  :  T  ~ 

*  *  l  c  c 

TV’  c  * 

■**2  0  0 

I  -  i 

*  *3  C  0 

J“i  =  „ 

*  **  C  0 

J  u =  u 

**500 

:-ll 

*  *e  0  0 

~  ^  .  w 

**700 

z 

•-cell  »ert 

*  *e  C  0 

M  : 

*  *5  C  0 

y  c  -  , ; 

*  5C  C  0 

ivi  -  : 

*5100 

;  *.  -  : 

*52  C  0 

jv1  =  2 

*  33  C  0 

*j  v<  -  w 

*  5*  C  0 

: -ll 

*  55  0  0 

~  •  *  ^ 

*  56  0  G 

1 

*  5  7  (i  0 

_  ^ :  «■  ( 

*  5c  C  0 

“ 

Z  *  C  k  for  i 

*  59  0  0 

X  1  -  A  ~ 

*60  0  0 

x  4  -  x  7 

*  61  C  0 

x  J  =  *  - 

*  62  30 

y  i  =  y  : 

*  63  C  0 

v ;  z  i  ~ 

*  6*  0  0 

7  ‘UL  i 

*65  CO 

I  c  <  YJ 

*  6t>  0  0 

_  .  .i  ■  - 

*  67  0  0 

7  L  7  r 

*  be  C  0 

W  *  *  - 

*  69  C  0 

*;  :  * 

*  70  C  0 

c 

C-  C  '*  t  l  vert 

*  71  0  C 

V  *  -  ▼  • 

*  72  0  0 

f,  -  T  - 

*  73  C  0 

i  ** 1  =  : 

*  7*  C  0 

?  V  ■  -  * 

*  75  0  0 

*  (  L  .  «N 

*  7d  0  J 

^  M  : 

“  77  C  0 

_  “  r 

*7-00 

■  L'r 

*  79  3  0 

"  1  = 

*  cO  C  C 

*  "  .  = 

*  ->1  C  0 

r.  \  :  p 

-  c2  0  0 

:-ul  r. 

*“300 

:  i  l  l 

*  c*  0  0 

c. 

.  -  C  -  l  l  J  e  r  t 

*  95  C  0 

7  1  -  / ; 

*  96  0  0 

7  ' 

.  lO.  1 >  They 


<  :  *  i ,  i  ■ 


* 


'll 


4  90  0  0 

<♦9100 
<*  92  0  0 
<♦  95  0  0 
<♦54  0  0 
4  95  00 
4  96  0  0 
4  97  CO 
4  56  G  0 

4  99  o  0 

5  00  0  0 
5  01  00 
5  02  C  0 
5  05  00 
504  00 
5  05  0  0 
5  Ob  0  0 
5  07  0  0 
5  Oo  00 
5  09  00 
5  10  0  0 
51100 
5  12  C  0 
5  13  CO 
5  14  0  0 
5  15  0  0 
5  16  0  0 
51700 
5  lc  C  0 
5  19  00 
520  00 
3  2 1  C  0 
522  0  0 
5  23  00 
5  24  0  0 
-j  25  0  C 
5  26  0  0 
527  0  0 
o2=  C  0 
■:  29  C  0 
5  30  00 
5  310  0 
o  32  CO 
5  33  C  0 
534  C  0 
5  35  C  0 
5  36  OG 
5  37  C  0 
5  3r  C  G 
5  3  5  0  C 
540  o  C 
54100 
542  C  0 
5  43  C  C 
5  44  0  0 
545  0  0 
54600 
5  4  7  0  0 
5  4b  0  0 
549  0  0 
5  50  C  0 


JM2  =  J  V 

CALL  I\IT£RP<X1,  ri,  X  2  *  Y2,  X3,  Y  3 ) 

CALL  VNCOlICl,  1*2,  JM1,  J  M  2  »  Y3> 

C-cell  horizontal  Oounaary. 

xi  =  yGulG 

X  2  =  YG*.E« 

X  3  :  Y4 ( J9  ) 

Y  1  =  T  C  C  L  0 

Y  2  =  TGGEh 

16  (LOWER  .  r  G  .  1)  THEN 

IM1  =  IC 


Ji*I  =  jC  -  1 
J  v  2  =  jC 

CALl  lNTERP(*lt  y  1,  X2*  Y2,  X3»  y*) 

call  C  V  D  <  I  V 1  ,  I«2,  JM1,  J  42  *  Y  3  ) 

'll  horizontal  tuahcary. 

V1  =  JGGL2 

Y2  =  o 0  * i E  in 

I  1  -  I  - 


:  All  I '»  7  E  "  p  <  xi,  *1,  a  2  *  Y2,  *3*  Y3) 

:all  lvCG(Iu1,  I  V  2  *  Uhl,  j«t,  Y  3 ) 

:l  : R  ('.cage  .eg.  ?>  t -<r 

.1  horizontal  Couna3ry. 
a  =  YGOLD 
'2  =  Y  G  \E  2 

<  3  =  YcUn) 

'i  =  t:cl: 

'  c  ^  t:v:» 

:  vi  =  : : 

v  =  ic 

=  JC  -  1 
,v2  =  JC 

:all  IMEPP(X1,  VI,  x  2  »  Y2,  <3,  Y>) 

:-LL  C  M  C  2  (  i  (X 1  *  I  '<  2 «  J  «  1  *  a  12,  Y3> 

l  horizontal  COudOary. 

'1  =  jCClG 
'  2  =  L  G  E  2 
:  =  i  l 
:  '*?.  =  i  . 

' v 1  =  J„  -  1 


J  w  —  W  w 

:«lL  r.TLPPiXl,  Y1,  x  2 ,  Y2,  x  3 ♦  Y3) 

:all  afioiri,  i  2  *  j ^ i  *  j«2,  Y3> 


:  -  G  L  IF  (  \  G  A  G  i 
'  htch  for  f.  it  h. 


.EG.  4)  HEN 


'  1  :  X  G  ■:  L  G 

>2  c  Xj'.EJ 
I  5  =  X  b  c  I  b  *  1  > 

1  =  YG  lLG 

'  2  -  Y  r  \  E  '2 

.All  INTFPP(X1,  Yl,  x  2  <  Y2,  x  3  ♦  Y3) 

35.85 


r'V.VV.V.’O 

vy 


55100 

IF  (Y3  .LT.  YB(JB»>  THEN 

5  52  0  0 

LOWER  =  1 

553  00 

ELSE 

5  54  0  0 

LOWER  =  3 

5  55  00 

ENDIF 

5  5600 

r 

u-cell  vertical  Doundar/. 

5  57  00 

Y1  =  bDOLD 

558  00 

Y  2  =  US  NEW 

5  59  00 

I  r- 1  =  iu  ♦  l 

5  60  0  0 

I  “2  =  I'.J 

Obl  0  0 

IF  (LOWER  .13.  1)  T-iEN 

5  62  CO 

JM1  =  JU  -  I 

5  63  0  0 

u«2  =  JL  -  1 

5  6h  0  0 

ELSE 

5  65  0  0 

U«1  =  Jb 

5  66  0  0 

J  u  2  =  JU 

567  00 

E  \C  I  F 

5  68  00 

CALL  INTERFtXl,  Yl,  X  2  * 

Y2 ,  X  3  .  Y  3  ) 

5  o5  0  0 

CALL  umoo»;.«1,  I!“2,  JW1, 

JM2 .  >2  ) 

5  70  0  0 

C 

C-cell  nor  1  zo.'it  aL  boundary. 

5  710  0 

XI  =  Y3  0L0 

5  72  0  0 

X,:  =  YONEW 

5  73  CO 

X  3  =  Y  b  (  J  B  ) 

5  74  0  0 

Yl  =  TC  OLD 

5  75  0  0 

Y  2  =  TC'jEW 

5  76  CO 

IV1  =  IC 

5  77  0  0 

IM2  =  IC 

5  78  0  0 

JM1  =  JC  -  1 

5  79  0  0 

J  u2  =  JC 

□  50  00 

CALL  Ii\TERp(Xlt  Y  1 ,  X2, 

Y2,  X  3  . 

5  9100 

CALL  CVOjUMI,  IM  2 .  J«l, 

J»2,  Y  3  ) 

5  82  0  0 

c 

u-cell  horizontal  boundary. 

583  C  0 

Yl  =  UC  OLD 

5o4  00 

Y2  =  u:\ew 

5  o5  0  0 

IF  (LOwE°  .EG.  1)  TnEN 

5  56  0  0 

:vl  =  IU 

5a7  00 

i«2  =  Iu 

5  8o  0  0 

ELSE 

5  s9  0  0 

IM  1  =  IU  *  1  . 

590  0  0 

IM  2  =  IU  ♦  I 

3  5100 

EMI  F 

5  92  C  0 

JM1  =  JU  -  1 

5  93  C  0 

JM  =  JU 

5  94  Q  0 

CALL  IMFRP<X1,  Yl,  X2, 

Y2  ,  x  3 ,  y  3  ) 

3  3500 

::.L  wMuO(IMi,  I«2,  j  6  i . 

J92  .  T  3  ) 

3  9b  0  0 

5  97  00 

ELSE  Ic  (  ‘.CASE  .EG.  5)  Tr-E 

N 

5  98  0  0 

r- 

b. 

--cell  vertical  oounoary. 

5  950  0 

xi  =  XCOLC 

600  CO 

xc  =  XCGEW 

6  010  0 

X  3  =  X c  (  I  R  *  1  ) 

o  02  0  0 

Yl  —  U  u  U  U  u 

603  00 

f L  =  u  E  NE  w 

6  04  00 

I  M  -  lb  ♦  1 

605  0  0 

I  2  -  I  b 

b  06  0  0 

J.j  1  =  J  u 

6  07  00 

u  M  r  =  J  tj 

6  06  00 

CALL  I  ME  OP  (XI.  Yl.  X  2  * 

Y2 .  X  3  .  v  3  > 

609  0  0 

:all  uvoC( ivi .  :«2.  jvi, 

J42,  Y  *  > 

b  10  0  0 
bll  00 


ELCE  IP  C.CACE  .L 9.  b)  THLN 

35.86 


6  12  0  0 


U-cell  vertical  boundary. 


6  13  0  0 

XI  =  XD  OLD 

6  14  0  0 

X  2  =  XONEU 

6  15  0  0 

X  3  =  XB<  IB  *  1  ) 

616  0  0 

Y 1  =  UDOLC 

b  17  0  0 

Y  2  =  UDNEb* 

6  lb  0  0 

I  M  1  =  IU  ♦  1 

6  19  00 

1*2  =  IU 

6  20  0  0 

JMI  =  JU 

b21  00 

J  M2  =  JU 

b22  0  0 

CALL  INTEPPcXl, 

623  00 

CALL  LMOC  <  I  M 1 « 

624  00 

C 

V-cell  horizontal  o< 

b25  0  0 

XI  =  YCOLO 

6  2600 

X  2  =  YONEW 

b2 7  0  0 

X  3  =  YP ( JP  ♦  1  ) 

626  C  0 

Y 1  =  yEGLO 

629  00 

Y  2  =  VCNEW 

630  00 

I  Ml  =  I  y 

631  00 

I  u2  -  i  y 

6  32  0  0 

JMi  =  j y  ♦  i 

633  00 

j  M2  =  jy 

6  3400 

CALL  IMERPCX1, 

635  00 

call  VMC 0<  I«1  , 

b  3b  0  0 
b  37  0  0 
6  3600 
639  00 


ELSE  IF  <  r.C  ACE  .EC.  7)  THEN 
V-cell  horizontal  DOunUary. 


b 4 0  00 

XI  =  YCOLO 

64100 

X  2  =  YCNEW 

642  0  0 

X  3  =  YR<  JB  *  1  ) 

o43  00 

Y  1  =  VOGlD 

6  44  0  0 

Y2  ;  VCNEW 

645  00 

tMl  =  IN 

64600 

:v2  =  iv 

647  00 

JMI  =  jy  ♦  1 

648  00 

J  w2  =  JV 

649  00 

call  INT£RP(xl « 

6  50  0  0 

C  ALL  V“OD<  1*1  * 

o  51  00 

c 

6  52  CO 

ELOE  IF  cMC  ASE  .E 

6  53  0  0 

c 

Check.  for  oath. 

6  54  0  0 

XI  =  XC  OLD 

655  00 

X  2  —  XCNEW 

6  56  0  0 

X  5  =  X  5  (  I  5  ) 

6  5700 

Y  1  =  YCOLC 

6  5c  0  0 

Y2  =  YCNEW 

6  59  0  0 

call  INTERP  f  XI  , 

660  00 

IF  <  Y3  .LT.  Y  -3  < 

b61  G  0 

LOWER  =  1 

6b2  0  0 

ELCE 

6  63  0  0 

LOWER  =  0 

6  64  0  0 

r  ,c if 

6  65  0  0 

£ 

C-cell  vertical  toui 

b  66  0  0 

Y  1  =  TCOwC 

667  0  0 

Y2  =  TCNEW 

6  68  0  0 

I  M  1  =  IC  -  1 

6  6900 

Iw2  =  IC 

6  70  00 

J  M  1  =  JC 

6  7100 

J  M2  =  JC 

E>  THEN 


672  00 


CALL  INTERP (  Xl  »  Y  1 1  X  2  *  Y  2  *  X  3  »  Y3) 
35.87 


6  7300 
6  74  0  0  C 
6  75  00 
b  76  0  0 
b  77  00 
678  00 
67900 
6  80  0  0 
b  61  0  0 
6  82  0  0 
693  00 
68400 
b85  00 
b  £6  0  0 
6  97  00 
68600  C 
o  o9  0  C 


CALL  CMODtIMI,  IM2,  JMl,  J  H  2  *  Y3  > 

V-cell  vertical  boundary. 

n  =  voolo 

Y2  =  VONEU 
IM1  =  IV  -  1 
IM2  =  IV 

IF  <  LOWER  .EQ.  1)  THEN 
JM 1  =  JV 
JM2  =  JV 
ELSE 

JM  1  =  JV  ♦  1 

J  h  2  =  JV  *  1 

END  IF 

CALL  INTERPlXl,  YI,  X2  ,  Y2,  X3,  Y3) 

CALL  VMODUMl,  I M  2  *  JMl,  J  M2  *  Y  2  > 
V-cell  horizontal  boundary. 

<1  =  YD  0«.  Q 


690  00 

691  00 
»92  00 
6  93  0  0 
6  94  0  0 
695  0  0 
b96  00 
697  C  0 

699  00 

6  9900 

700  00 
7010  0 

7  02  0  0 
7  03  0  0 
7  04  0  0 
705  0  0 
7  06  0  0 


X  2  =  Y0NEW 
X  3  =  YR  <  J9  *  1  ) 

IF  (LOWER  .EG.  1)  HEN 
I“1  =  IV  -  1 
1 *2  =  IV  -  1 

else 

im  i  =  IV 
I M  2  =  IV 

END  IF 

JMl  =  JV  ♦  1 
J  M2  =  JV 

CALL  INTERPtXl,  Yl,  X2,  Y2  ,  X3,  Y3> 

CALL  VMCDdMl,  I  M  2  »  JH1,  J  M  2  *  Y3) 
ESC  IF 

ELSE  IF  (MCASE  .EQ.  2)  ThEN 
IF  (NCASE  .EQ.  1)  THEN 


707  0  0 

C 

u-cel  l  vertical  oounoary. 

7Qb  0  0 

xi  =  xDOlO 

7  09  CO 

X2  =  X3NEW 

7  10  00 

X  3  =  X  R  < IB) 

711  00 

Yl  =  UOCLD 

7  12  0  0 

Y  2  =  LONE*. 

7130  0 

I M 1  =  IU  -  1 

7  14  0  0 

IM2  =  IU 

7  15  0  0 

JV1  =  JU 

7  16  G  0 

uB2  =  JU 

7  17  0  0 

CALL  INTE«P«XI,  vi,  X2,  Y2,  X3,  V3) 

7  19  00 

CALL  UM  GD ( I  M  1  *  I M  2  *  JMl,  J  M  2 ,  Y3> 

719  0  0 

720  0  0 

ELSE  IF  (NCASE  .EG.  2)  THEN 

721  00 

c 

Checu  for  path. 

7  22  0  0 

XI  =  XCOLO 

7  23  0  0 

x  2  =  XSNEW 

724  00 

Xi  =  X5  »  IB) 

72500 

Yl  =  YDGLO 

72600 

Y 2  -  YONEW 

7  27  0  0 

CALL  INTERP(X1,  Yl,  X2,  Y2,  X3,  Y3) 

728  00 

if  (Y3  .lt.  yb ( jb > >  then 

7  2900 

LOWER  =  1 

7  30  0  0 

ELSE 

7310  0 

lOUER  =  0 

732  00 

END  IF 

7  33  0  0 

u-cell  vertical  boundary. 

35.88 


7  34  0  0 


7  35  0  0 

Y2  =  LQNEy 

7  36  C  0 

1*1  =  IU  -  1 

7  37  00 

1*2  a  Iu 

738  0  0 

IF  (LOWER  .EO. 

734  0  C 

uMl  =  JU  -  1 

7  40  0  0 

J*2  =  JU  -  1 

74100 

ElCE 

742  0  0 

J*1  =  JU 

743  0  0 

J*2  =  Jd 

744  0  0 

ENC  IF 

745  00 

CALL  INTERP(X1 

746  00 

CALL  UMCC< 1*1 , 

/  47  0  C 

C 

C-cell  horizontal 

7  4c  0  0 

XI  =  YCuLD 

749  00 

X  2  =  YCNEw 

7o0  00 

x  5  =  Y  5  ( j  d  > 

751  00 

Y  1  =  TCCLD 

752  00 

Y2  =  TONE  W 

7  53  0  0 

1*1  =  I C 

7  5400 

1*2  =  1C 

755  00 

J*1  =  JC  -  1 

7  56  00 

J  *2  a  JC 

757  0u 
7  5e  C  0 
7  59  0  C 

760  00 

761  00 

762  00 

763  00 
7  64  0  0 
7  b5  0  0 
7  6o  0  0 
767  00 

7«»e  cc 

7o9  0  0 
77C00 


1)  THEN 


call  IM[BP(X1,  Yl,  X2  *  Y  2 »  X3, 
C-4L.  CXOOUM1,  I  M  2  *  J  M  1  ,  J  H  2  *  y; 
J-cell  horizontal  boundary. 

Yl  =  UCGlO 
Y2  =  ujNE'W 

IF  (LOWER  .EC..  1)  Then 

rn  =  iu 

:*2  =  ib 
EubE 

I"  1  =  IU  -  1 
I * 2  =  Iu  -  1 
r\:iR 

0  Ml  =  db  -  i 
J  *2  =  JU 


7  71  0  0 

CALL  INTERP( x l ,  Yl  ,  *2 ,  y2 , 

7  72  CO 

CALL  U*CC(I*1,  1*2,  JH1,  j* 

7  73  0  0 

c 

7  74  0  0 

ELSE  IF  C.CACE  .EC.  J,  TnE\ 

7  75  00 

- 

C-cfll  horizontal  boundary. 

7  76  0  0 

XI  =  YCJLC 

7  77  CC 

‘d  =  YC’tEW 

77=  CC 

"7  =  Y  !•  <  J  E*  ) 

7  79  C  0 

Yl  =  T  ~  2  L  C 

7  r.  0  0  C 

Yd  =  t : \ e  w 

7-1  C  C 

I“1  =  IC 

7=200 

I  *  f  a  I  C 

7  8  3  0  0 

J*1  =  Jr  -  1 

7  =4  :  c 

J'L  =  JC 

7=500 

CALL  ir.TLRP  1X1  ,  Y  1 ,  x  2  ,  y  2  , 

7  Afc  oo 

Call  C*CC(I*1,  1*2.  J*1 ,  d*. 

7  8  7  0  0 

w 

u-ct-ll  horizontal  DOunQury. 

7co  0  0 

Yl  =  UCduC 

7  89  0  0 

YC  =  uC:.EW 

7  90  0  0 

1*1  A  I  b 

7  910  0 

I*d  A  U 

792  0  0 

J*1  =  JU  -  ; 

7  93  0  0 

J*?  a  JL 

7  94  0  0 

C  all  IMEBPim,  y  1 ,  X2  ,  Y  2  , 

35.89 

7'V>V./V.y.-v^.vy; 


7  95  0  0 
7  96  0  0  C 
797  0  0 
796  00  C 

7  99  0  0 
6  00  0  0 
9  010  0 

-3  02  0  0 

6  03  0  0 
e  04  G  0 

8  05  00 

3  06  0  0 

o  07  0  0 

3  08  0  0 

8  090  0 
91000  C 
311  00 
912  0  0 
6  13  0  0 
3  14  0  0 
61500 
81600 
31700 
n  lt>  0  0 
=  19  0  0 
320  00 
c  21  0  C 
=  22  CO 
623  0  0 
6  24  00  C 

8  25  CO 
3  26  0  0 
327  0  0 
62900 
6  29  C  C 
330  CO 
;  31  00 
3  32  00 

-  33  0  0  C 
3  3<*  0  0 
3  35  0  0 
6  36  0  0 
3  37  0  0 
3  36  0  0 
33900 
6 * C  00 
341  00 
-*200 
3  4  3  C  0 
6  4h  0  0 
3  4300 

9  46  CO 
347  00 

8  48  0  0 
o49  0  0 

3  50  0  0  C 
3bl  00 

9  52  CO 
-53  00 

3  54  0  0 

6  55  0  0 


CALL  UM00UM1,  IM 2 »  JM1,  JH2»  Y3> 

ELSE  IP  (NCASE  .EQ.  4)  THEN 
Check  for  path* 

XI  =  XCOLD 
X  2  =  XCNEW 

X  3  =  XB(  I  3  *  1  ) 

U  =  YDOLO 

Y  2  =  YDNEW 

CALL  1NTERPCX1,  Yl,  X2.  Y2  ,  X3»  Y3> 

I  8  (  Y3  .LT.  Y  R  (  J  R  )  )  THE*. 

lOwER  =  1 
E  LSE 

LOWER  =  0 
E  NO  I  c 

C-cell  vertical  30jnaary. 

Yl  =  tcolc 

Y  2  -  TCNEw 

i  v  l  =  i  c  -  i 

I  82  =  IC 

i f  , lower  . l o .  i >  then 

uMl  =  JC  -  1 
Ju2  =  JC  -  1 

else 

JV1  =  J  c 
J«2  =  JC 
E  \  2  I  c 

Call  INTERPtXl,  vl,  *2,  Y2,  xi,  Y3> 
CALL  C900(IH1,  I  u  2  *  JMl,  Jk-2,  Y3  ) 
V-cell  vertical  DOuncary. 

Yl  =  VC  CL  C 
Y2  =  VCNEU 
IW1  =  IV  »  1 

1*2  =  IV 

J  1  =  J  V 

J  M2  =  JV 

CALL  INTER? «X1  ,  Yl,  Y2,  Y2,  X  3 ,  Y3> 

CALL  VMCCdMl,  Iu  2 ,  JM1,  JX  2,  Y?  ) 
C-cel l  horizontal  countdr/, 

XI  =  YCOLC 
X  2  =  YCNEW 

X  3  =  YR ( JP  ) 

Yl  3  TCCwC 

Y  2  3  T  c ',  £  w 

I-  (L0v‘rc  .EC.  1)  THEN 
!•'  1  -  I  C 
I  M  2  =  I  C 
E  LCl 

IM1  :  ic  *  1 

I M  2  =  IC  *  1 
E  '«  u  I  F 

JM1  =  JC  -  1 
J  v2  =  JC 

CALL  INTE0P<X1,  Yl,  X2 ,  Y2,  X  3 ,  Y3) 

CALL  CMOCdf'l,  I'*2,  JM1,  J  4  2  ,  Y?) 

--cell  horizontal  boundary. 

Yl  =  -COLD 
YC  =  JONEW 
I  « 1  =  I  u 
182  =  Iu 
JM1  =  JU  -  1 


6  5600 
857  00 
8  58  0  0 
”.5i00  C 
;  60  0  0 
:  61  C  0  C 
8  62  0  0 
5  6.5  0  0 
o  6**  0  0 
3  65  0  0 

5  66  0  0 

3  67  0  0 
568  0  0 
o69  00 
3  70  0  0 
c  71  0  C 
e  72  0  0 

3  7?  0  0  : 

8  74  0  0 
3  75  CO 

5  76  00 
8  77  0  0 
o  76  0  0 

6  75  0  0 
3  eO  OC 
6  610  0 

3  o2  C  0  C 
6  83  0  C 
=  8<*  0  0  C 
685  00 
3  ob  0  0 
3  87  00 
6  86  0  0 
3  8500 
690  00 
391  00 
8  92  0  0 
c  93  0  0 
694  GO 
39500 
89600  C 
c  9  7  0  0 

8  9c  0  0 
e  99  C  0 
=4  00  0  0 
3  01  00 
a02  CO 

903  CO 

904  0  C 

3  05  0  C  C 

9  Ob  C  0 
9  07  0  0 
3  Oc  0  0 

909  0  0 

910  00 

911  00 
9  12  0  0 
9  13  OC 
9  14  0  0 
9  15  0  0 
9  16  G  0 


JM2  =  JU 

C8LL  INTERPtXl.  VI.  >2 1  Y2,  X3,  *3, 

CALL  UM0DCI91,  IM  2 »  JM1.  J«2,  V  3 ) 

ELSE  IF  «'JC4Ct  .EG.  5>  ThL\ 

C-ceLl  vertical  uoandary. 

XI  =  XDCLS 
x  2  =  XS\Ew 

X  3  =  Xfc  «  IB  *  1  ) 

Y  1  =  TOOLS 

Y  2  =  TSGEw 

161  -  IC  *  1 

I "2  =  IC 

J91  ;  JC 

j*:  =  jc 

C6lL  I\T£9P|X1,  y 1 ,  x£,  Y2,  X3,  Y'J 

C-LL  C900<I*U,  I  *  2 «  j>M,  Jy2,  Y?  ) 

V  -  c  e  l  l  vertical  OOandary. 

Y 1  =  VSGLO 
Y2  =  VSr.Ew 
I M 1  =  IV  ♦  1 

:•'?  =  iv 

J  H  i  =  J  V 

Jv 2  =  J  V 

C-lL  IMERP1X1,  Y1,  42.  Y2,  X  3  *  Y3) 

S6LL  VMGS<IV1,  !m2,  JM1,  J M  2 .  Y3 ) 

ELSE  IF  tSCASE  .EG.  6)  ThEV 
Check  for  path. 

XI  =  XSCLS 
x  2  =  XSNEW 

x  2  =  x  e  ( i  b  ♦  1  > 

y  1  =  y  s  r  l  s 

Y  2  =  YST.E* 

C6LL  INTERP(X1,  Yl,  X2,  Y2 ,  X3,  Y3> 

IF  (  Y  3  .LT.  Y"(jh  ♦  1))  TriEiX 
LOWER  =  1 
ELSE 

LOWER  -  C 
E  \C  I  F 

s-cell  vertical  OOundary. 

Yl  =  TOOLS 

Y  2  =  TSNEW 
I'M  =  IC  *  I 

j -  1" 

=  JC 
J  M2  =  JC 

CLLL  INTEFP ( XI  .  Yl,  X2,  Y2,  X 3  ,  Y3) 
CiLL  Cw  OC  (  I  M1  »  1^2,  j«l,  J  M  2  ,  r  3  ) 

•J-  cell  vertical  DOandary. 

Yl  =  VSCLC 

Y  2  =  VC  NEW 
191  =  IV  *  1 
I  u2  =  IV 

IF  l LOWER  .EG.  1)  TriEN 
JU1  =  J V 
oM  2  =  JV 
ELSE 

J9  1  =  JV  ♦  1 
J“2  =  JV  ♦  1 

L.'iul  F 


917  0  0 
9  13  0  0 
9  19  0  0 

920  00 

921  00 

922  0  0 

923  0  0 

924  00 
9  25  0  0 
9  26  0  0 
927  0  0 
923  00 
°29  00 
9  30  CO 
9  3  1  C  0 
9  32  0  0 
9  33  00 

934  0  0 

935  00 

936  00 
9370  0 
9  3o  0  0 
9  39  0  0 

940  00 

941  00 

942  00 

943  QO 
9  44  0  0 
9  450  0 
9  46  0  0 
94700 
943  00 

949  00 

950  0  0 


Q 60  00 
961  C  Q 
9  62  CC 
9b3  0  0 
9  64  c  0 
9  65  GC 

966  0  0 

967  00 
9bo  CO 
9  69  0  0 
9  70  00 
971  00 
9  72  C  0 
9  73  0  0 
9  74  00 
9  75  0  0 
9  7b  0  0 
9  77  0  0 


CALL  INTERPtXl,  Yl,  X2,  Y2 ,  X3, 

CALL  VHOOdMlt  I  M2  ,  jMl,  J  M  2  *  y; 
V-cell  horizontal  bounaary, 

XI  =  YCOLO 
X 2  =  YQNE  M 
X  3  =  Y9  <  JB  *  1  ) 

IF  ( LOhER  .EC.  1  )  TdEN 
IM1  =  IW  *  1 
1*2  =  I V  *  1 
E  ICE 

IM1  =  IV 
I  “ 2  =  IV 

E  10  I  F 

J*1  :  JV  ♦  1 
J*2  =  JV 

CALL  IMERFlXl,  *1,  x  2  *  Y2  ,  X3,  Y3> 

CALL  VHCDCIM1,  IV2,  JM1,  J  M  2  *  Y3) 


q  51  0  0 

XI  =  XCOLD 

952  00 

X  2  =  XONEW 

953  0C 

x  3  =  Xdl IB) 

9  54  0  0 

Yl  =  L0CL3 

9  55  0  0 

Y2  =  'JCNEW 

9  56  0  3 

1*1  =  I'J  - 

5  57  0  C 

If* 2  =  I  L 

c5c  00 

J*1  =  JO 

959  0  0 

o*2  =  JU 

LL CE  IF  INCASE  . EQ.  7)  ThEN 
V-cell  horizontal  boundary. 

XI  =  YCCLC 
Xc  -  Y  z  '*  E  W 
X  3  =  Y5(Jb  »  1> 

Yl  =  VCOLO 
Y2  =  VCNEW 
I  Ml  =  IV 
IM2  =  IV 
J*1  =  JV  *  1 

J*2  =  JV 

Call  IMERP(X1,  Yl,  x2*  Y  2 ,  x  3 ,  Y3) 
CALL  VMODtm,  1*2,  0*1,  J  M  2  ,  Y  3  ) 

'"■LEE  IF  <  f.C  A  3  E  .EC.  b)  Then 
J-cell  vertical  boundary. 


C-lI  uH02(IMl, 


J*l.  J  *  2  » 


,  Y3) 
Y  3  ) 


XI 

=  YCCLO 

x  2 

=  YCNEU 

x  3 

=  Ybtje  * 

x  1 

=  VCOLo 

*2 

=  VCNEW 

I  -  1 

=  IV 

I  *2 

=  I  J 

J  U1 

=  JV  ♦  1 

J  *2 

=  JV 

All  1M.RMX1,  Yl,  *2,  yp,  x3,  Y 
ALL  V“CClI*l,  I  v  2  ,  J  *  1  ,  J*  2  »  Y  3  > 

1  F 


rND  IF 

ELSE  IF  ("CACE  .EC.  3)  TnEN 
IF  c  '<  C  ACE  .EC.  1)  ThEV 


A-- 


y-'Cvy-A-V  . 
v.v  \V 


9  7tt  0  0 

C 

U-cell  vertical  oaunaar/ 

9  7900 

*1  =  X30L3 

980  00 

X  2  =  XONEW 

9  3100 

X  3  =  X8 ( ID  ) 

982  00 

y  1  =  DC  OL  3 

983  00 

Y2  =  oE^E* 

9  &*•  0  0 

IM1  =  I U  -  1 

9  85  00 

I M2  =  L 

9  3600 

J  v  1  =  J  U 

987  00 

J  f*2  =  JL 

9o8  00 

CALL  INTE9P»X1,  Y  1  , 

98900 

CiLL  6  M  0  D  (  1  “  1  ,  1 «  ?  ,  , 

9  90  0  0 

C 

991  00 

III  j£  IP  (NOflSE  .EC.  2) 

9  92  0  0 

c 

v-Ctll  vertical  do u mar/ 

993  00 

XI  =  X30LD 

9  9**  0  0 

x  2  =  XCAEw 

9  95  0  0 

x  3  =  X3  < I 3  > 

99600 

Y1  =  UCCLD 

99700 

Y  2  =  U 3\EW 

9  9o  0  0 

I  wi  =  I  U  -  1 

9  39  0  0 

IM;  =  I'J 

35.93 


* 


0  0100 

JT  =  JL 

0  02  0  0 

JM2  =  J'J 

C  03  0  0 

C  4LL  IVTERPf  x 

0  04  0  0 

C  ALL  uXG: «  I  v  1 

0  05  0  0 

l_ 

V-cell  horizontal 

0  06  0  0 

XI  =  Y  C  ~  L  C 

:  07  o  o 

X2  w  YC5EW 

0  Oo  0  0 

X  3  =  YB ( J fi  » 

0  090  0 

Yl  =  VCCLC 

0  10  00 

y  2  =  «:■•,£» 

0  110  0 

I  T  =  IV 

0  12  C  0 

I  M2  =  I V 

0  13  0  0 

1 

II 

> 

0  14  c  0 

J  Xa  —  o  <J 

01500 

CALL  IUI49V 

0  16  0  0 

C  all  \Ju  CC(  IH1  , 

01700 

L. 

C  lo  C  0 
0  19  C  0 

020  a  o 
02100 
0  22  GO 
0  23  00 
0  24  0  0 
0  25  0  0 
02600 
0  2  7  0  0 
028  0  0 
0  29  0  0 
0  30  0  0 
031  00 
0  32  0  0 
033  00 
034  00 
0  35  0  0 
0  3b  0  0 
0  37  0  0 
0  38  00 
039  0  0 
0  40  C  0 
o  4l  0  0 
0  4200 
0<*3  0  0 

0  44  C  0 


r  1  , 
IT  * 


»2  ♦  to 
J*l,  J 


x  3  * 

.  v 


y  3) 

» 


y  1 
IT, 


<2, 

JT  , 


Y2  ,  *3, 

J  h  2  t  Y 


v  3  ) 

:  > 


IP  <‘<CACE  .EG.  3)  T  -I  ■'  '* 


V-c  e  l l 

X  1  = 

= 

X  3  = 
y  l  = 

Y  0  - 

I  -  1  = 

it.  = 


horizontal 
_  y  -  -  l  C 
=  ye\e* 

=  Yt«Jt> 

=  VCJLC 

=  vevew 

i  j 
i  V 


b  Oj noary. 


JM1  =  jv  -  l 
Jw2  =  JV 
Call  I\TERR<  XI  , 
C  ALL  VTC  i  IT  , 


Y  1, 

IT 


*2  , 
JT 


12, 

JT 


HI,  Y 

.  YJ  , 


ELSE  IP 
CheCK  for 


<  ►  C  ACE 

Loth. 


4)  WN 


xi  =  XCULC 
x  2  =  X  C  r<E  h 
x  3  :  xfi<  IB  *  I) 

Y  1  =  YC0LC 

Y  2  =  Y  j  f;  E  . 

CALL  INTC°P<X1,  Yl, 
18  <  Y  3  .  L  T  .  Y)(Jt;)) 

LOWE0  =  1 
ELCE 

LOWER  =  Z 
E  i  0 


x  2  *  ' 

T  rl  E 


Hi,  Y 3) 


5 

> 

V 


y 


‘i 


i 


& 


J45  0  G 

0  4600 
0  47  C  0 
0  4e  C  0 

049  0  0 

050  00 
051  0C 
u52  00 
0  53  00 
0  54  00 
0  55  0  0 
0  5b  0  0 
057  00 
0  58  0  0 
0  59  0  0 
0  60  0  0 
0  6100 


r -\  -WT 


V  ■  -•  s  -  /  V  -  « v  -  -  *  . 

.  *»  •  ».  ■-  >L  V  *.  ■■  *. 


C-Cell  vertical  boundary. 

Yl  =  TCOLD 
Y  2  =  TIMw 
I  T  =  I  C  ♦  i 
I v2  =  I  C 
j"1  =  JC 

JT  =  JC 

CAll  I‘»  T  E  R  P  «  X  1  ,  Yl,  a  2  ,  12,  Hi,  Y  3  > 

CALL  CTCtIT.  IT,  J“l,  JT,  Y3> 
4-cell  vertical  Do„naary, 
y  l  -  y  C  0  L  D 
y:  =  vcr.Ew 
I  Y 1  =  I  y  ,  1 

I  "2  :  IV 

It  <LG*E8  ,E0.  1)  T-iEN 

-  T  =  j  y  -  i 
w  t  =  j  y  -  i 

35.94 


3 


w  *  *  ■ 


wWv*!'?1 


0  6200  L  L 


o  to  5  0  0 

JW1  =  JV 

06400 

J*2  =  JV 

0  65  C  0 

ENCIF 

C  do  0  0 

CALL  iNTcRPtKl*  Yl,  *2,  Y2,  *3,  Y  3 ) 

067  00 

CALL  VMCj«I“l,  I“Oi  JM.  j«2,  r  3  > 

3  6600 

c 

.'-cell  horizontal  roundary. 

069  C  0 

XI  =  Y^CLC 

3  70  0  0 

*2  =  r  C  N  E  a 

3  710  0 

X  3  =  Yb  < Jb» 

3  72  0  0 

Ie  <  LC«E9  .r2.  1  >  Them 

0  73  C  0 

:mi  =  :v 

v  7>*  0  0 

Iy2  =  IV 

3  75  0  0 

t  L'-E 

3  76  0  0 

i  l  =  iv  ♦  i 

0  77  C  0 

lv2  =  IV  ♦  1 

3  7o  0  0 

L  N„  i  F 

5  79  0  0 

JM1  =  J V  -  1 

0-000 

j “2  =  J  V 

0  «  1  C  0 

0  9  L  L  INTE0P(X1,  Yl,  X  2 ,  Y2,  X  3 ,  Y3) 

3  e2  0  C 

C9lI  VMOD1IM1,  IM2.  Jll,  JX  2  *  Y  3  » 

0  a  3  0  0 

0  34  0  0 

ruCF  If  <\CACr  .  E  F.  •  5)  ThEN 

0S5  0  0 

2  -  t  e  l  l  vertical  boundary. 

3  5o  0  0 

xl  =  x " C  L  0 

3-700 

*?.  -  a  0  r.  E  w 

3  a6  Q  0 

X  3  =  Xa l I ?  ♦  1 ) 

j  3  3  0  0 

Yl  -  T33l 3 

3  90  CO 

Y_  =  TO  NEW 

0  91  CO 

I  ■*  1  :  I  •:  ♦  1 

0  a2  C  G 

1*2  =  IC 

C  0  C 

Jyl  =  jC 

:  94  oo 

JMe  =  JC 

3  95  00 

Call  I N  T  E  0 p ( X 1 ,  Yl,  X  2 ,  y  2 ,  x  3  ,  y  j  > 

C  96  0  0 

0  A  l  L  CXC3(I1'1,  I«?.  Jwl,  J^2,  Y3) 

.  ■)  7  G  G 

.-cell  vertical  oovncar/. 

3  93  00 

Yl  =  VCOLC 

3  99  0  0 

y  2  :  V  0 1.  E  W 

1  00  CC 

I  'l  1  =  I V  ♦  1 

l  01  C  0 

l*.  =  IV 

1  02  0  0 

o  M  1  =  J  V 

1 03  c : 

J*2  :  JV 

1  04  0  c 

CAll  INTE9P(X1,  yi,  a  2 ,  Y 2,  <3,  y  3 ) 

1 05 :  c 

OUL  V*«oo  «  I«  1  ,  I'a2  ,  J“  1  ,  J  M  2  ,  Y>  > 

1  06  0  0 

1  0  7  C  C 

■LCl  I-  (N0ACE  .rC.  6)  THEN 

1  Oc  0  0 

c 

0  h  e  C  *  (Or  coth. 

1  09  3  0 

XI  =  XOOLD 

1  1C  0  0 

x  2  -  X  C  \  E  6 

1  11  C  0 

X  3  :  x  3  ( I  b  *  1  > 

1  12  C  C 

Yl  =  YCCLD 

1  13  CO 

Y2  =  yOT.Ew 

11-00 

call  INTE9PIX1,  Yl,  x  2 ,  Y2,  X  3 ,  Y3) 

1  lo  C  G 

IF  <  Y3  .lT.  til  jn  ♦  1))  THEN 

1  lb  0  C 

L  9  w  L  R  =  1 

1  17C0 

r  LCE 

i  ie oo 

L'«r=  =  9 

1  19  c  c 

l  N_1  F 

1  20  0  0 

u 

c-cell  vertical  DOunOary, 

121  00 

Yl  =  TC  OLD 

1  22  C  0 

Y2  =  TC  NE  4 

33.95 


123  00 

I**l  =  I c  *  1 

12*  CO 

1 M2  =  IC 

1  25  0  0 

IP  (LObfo  .50. 

1)  Then 

1  2b  0  0 

jhM  =  jC 

1  27  0  0 

JM2  =  JC 

12=00 

5  L2E 

1  29  0  0 

JM  1  =  J  C  *  1 

1  3C  0  0 

o*2  =  jC  *  1 

1  31  C  0 

E  \_  I  F 

1  32  0  0 

CiLL  I\TERP(Kl 

♦  71.  x  2  ,  72* 

X  3  , 

Y  3) 

1  33  0  0 

:-ll  c-rzi  im. 

I  M  2  *  J*l,  J’M 

,  73 

) 

13*00 

c 

J*Ce LI  vertical  O  0 

a  n  o  a  r  /  . 

1  3  5  0  0 

y  i  = 

1  3b  0  0 

7  2  =  V2'.E* 

1  37  0  0 

: v  i  =  :  v  *  : 

1  3o  3  0 

I  v  =  w 

1  39  0  0 

u  ‘M  -  J  •' 

1*0  00 

u  *2  =  J  J 

1*1  GC 

C-LL  ::.Tr3P<  *1 

*  7  1*  X 2  *  72  , 

X  3  , 

73  ) 

1*200 

ClLL  V  *  G  2  < IM1 • 

I M  2  *  j  *  1  ,  J  *  2 

,  73 

) 

1*300 

r 

2-cell  horizontal 

D  Ou  nrtd  r  y  . 

1  **  0  0 

xi  =  y:ol: 

1  *5  0  0 

a  2  -  Y  D  ■  *  l  W 

l*bOC 

x  3  =  yb < Jo  *  1 

) 

1*7  00 

7  1  :  T  ?  C  L  D 

1*9Q0 

*:  :  T"*.rw 

1  *9  C  0 

IF  <  L  C  «  *  .21. 

i )  t*ln 

1  50  0  C 

r*  1  =  I  C  ♦  1 

151  00 

I  '•*  2  =  I  C  ♦  1 

152  0  0 

?l:e 

1  53  0  0 

I'M  =  i  C 

1  5*  0  Q 

I v?  -  IC 

1  55  0  0 

r  •  -  t  r 

'  -  t 

1  5b  CO 

O'M  =J'  ♦  1 

1  5  7  0  0 

u  V  C  =  J  2 

1  55  00 

Z~LL  I  NT  E  R r  l  x 1 

,  7  1,  72  ,  72  , 

x  3  , 

y3) 

1  5  9  0  G 

Met  C  *M2  (  I  M  1  * 

I M  ~  »  J  «* 1  ,  J  u  2 

,  73 

) 

1  60  C  0 

i* 

,-Crl l  horizontal 

tCunCj  ry. 

1  bl  0  0 

71  =  220-2 

1  b2  C  0 

=  .TNEW 

1  63  C  0 

I  1  =  I  . 

1  b*  C  0 

1  «2  =  1  a 

i  b5  c  a 

-V1  =  Ju  ♦  1 

1  66  0  0 

uM  =  Ju 

1  67  0  0 

CiLL  I-.  TEcf(Vl 

,  v  1  ,  X2  *  72  , 

X  3  , 

73) 

1  oe  0  0 

I  .UL  2M0  2<  1*1  . 

I  M  2  *  J  -  1  ,  J  *  2 

,  'i 

) 

1  69  C  C 

1  70  CO 

- 

r  i _ r  IP  <  .2  5  25  . 

r*.  7)  then 

1  71  G  0 

2-cll  Horizontal 

tifiunCary. 

1  72  Cl  0 

XI  =  T  2  C  w  2 

1  73  0  0 

-  Y2'.5« 

1  7*  0  0 

»  I  =  Y  l-  (  J  3  *  I 

) 

I  7o  C  0 

7  1  =  I  2" 0  L  2 

1  76  C  0 

72  =  T  2  5  5  «7 

1  77  C  0 

I u 1  =  15 

1  75  C  0 

I 'V  -  I  ' 

1  79  0  0 

J”!  =  uC  •  . 

1  80  00 

jm  =  j: 

19100 

2-LL  I  r.  T  5  P  p  (  X  1 

*  7  1,  X  2  ,  72  , 

X  3  , 

7  3) 

1  *2  0  0 

cMr2<  i  *•■  i  * 

1 7?,  JM,  J  u  2 

,  7  3 

) 

1  o3  C  0 

c 

.*Cfll  horizontal 

bOunOory. 

vr'v  v -w  v'w  vr»  v~w  v»  t 


v  **  ►- 


134  QO 
1  85  0  0 

1  9b  0  0 

1  37  00 
1  8c  0  0 
18900 
13  0  0  0 
19100 
1  92  00 
1  93  0  0 
19400 
1  95  0  0 
1  38  0  0 
1  97  0  0 
1  9c  0  0 

1  39  0  0 

2  00  C  0 
2  01  0  0 
2  02  C  0 


2  03  0  0 

2  04  0  0 

A/. 

2  05  G  0 

2  06  G  0 

2  07  C  0 

*  «  * 

2  08  00 

M  _  »* 

y/, 

2  09  G  0 

• 

2  10  G  0 

r*?'* 

2  11  C  0 

aV' 

2  12  0  0 

r-*% 

2  13  CO 

W 

2  14  C  0 

2  15  C  0 

2  16  G  0 
2  17  CO 

2  18  0  0 

r.W 

2  19  0  0 

A,  V 

2  20  0  0 

22100 

& 

2  22  GO 
223  C  0 

2  2**  0  0 

Ev? 

2  25  0  0 

2  26  C  0 

2  27  0  3 

2  2s  0  0 

’v%" 

2  29  C  0 

fc 

2  30  C  0 

• 

J  31  CO 

2  32  00 
2  33  0  0 
2  34  0  0 
2  35  0  G 
23600 
2  37  0  0 
2  38  0  0 
2  39  0  0 
2  40  0  0 
24100 

242  00 

243  0  0 
2  44  Q0 


7  1  =  UOOLD 
7  2  -  UCNEW 
1*1  =  lu 

1*2  =  IU 
o*l  =  JU  *  1 

J  *2  =  JU 

CAlL  1NTLRP<  71,  vi,  /.  2  *  72  ,  x3*  7  3  ) 

CALL  U*GC<I*1«  1*2,  j*l,  j « 2  *  73) 

CLCtl  18  (  \C  A  3  E  .EG.  8)  T  h  8  sj 

Chec  x  tor  pot  h. 

71  =  XCCLO 
X2  =  XGNEirf 
A  3  =  X  9  <  1  b  ) 

7  1  =  y  3  r,  l  3 
7  2  =  7  3  Up n 

call  INT£RP<X1,  VI,  x  2 ,  72  ,  X  3  ,  73) 
18  (73  . L  T .  To (Jo  ♦  1))  THEN 
L  0  «£  9  9  1 
E  L3E 

lower  9  : 

E  \C  I  F 

U-Cc-LL  vertical  boundary. 

71  =  oCCLD 

72  =  ULVEU 

I  W1  =  lu  -  1 

I  ’V  9  I  o 

18  <L0„EP  .83.  1)  ThE!>) 

JV1  =  JU 

v*2  9  o  J 


1)  ThEN 


u"l  =  Jo  *  1 
J*2  =  JU  *  1 
El.C  l  F 

CALL  IMERPiXI,  7  1,  X2,  72,  x  3 , 
CALL  U*C0(I*1,  1*2,  JM 1 ,  J42,  y; 

•cell  horizontal  CCunoary, 

XI  =  7  J  OL  c 
x  2  =  72NEW 

<  x-  =  YF  (  JR  *  1  ) 

7i  =  tcclo 

7c  =  T3-.EW 
i y i  =  i: 


J‘/l  =  JC  *  1 
j  w  c  9  j  c: 

CALL  INT£RP( xl,  vi,  x  2 , 
call  C*0C(I*1,  I M  2 ,  J*l, 
/-Lvll  horizontal  oojnajry, 

v;  =  uccld 

7  2  9 

18  (LUWrR  .LG.  1)  T-ifN 

IM  1  =  IU  -  1 

IM2  9  I  l  -  1 

E  L  3  E 

1*1  =  lb 
I M 2  =  IU 
if 

JV1  9  J  u  *  1 

JV  =  Jo 

CALL  INTEtPfXl,  vi,  x  2  , 


72  ,  X 
J  v  2  , 


X  2  ,  72, 


^4,'Cni  ,*•  %  .*•  A  -•  ,v,%  v  a  .*•  .*■  A  .*■ 

/■’V  n8,/.  /  -■  ./  v  .  v,  .‘  A  .  -  .  J.  V  AX.  A.  A 

J,  V, .■  V..-.V, 

^  ">V  -  1 


'  \  *  V 

8.  V.  , 


• .  •  •  .  «\ 


1 


2*5G  0 
2  *e  0  0 
2*700 
2*3  00 

2  *9  C  0 
2  Du  0  0 
2  510  0 
2  52  0  0 
2  55  0  0 
2  5*  C  0 
255  CC 
2  56  0  0 
2  57  C  0 
2  5o  C  0 
2  59  0  0 
260  CO 
26100 
2  o2  0  C 
2  b3  C  0 
2  6*00 
.165  0  0 


>V\ 

266  C  C 

A*V*’ 

267  C  C 

AV- 

2  6«  0  0 

A'/. 

2  bj  0  0 

2  70  0  0 

• 

2  71  C  0 

c  72  0  0 

»f '  .  ■ 

2  73  0  0 

«,  * 

2  7*  C  0 

\  • . 

2  75  0  0 

y  7o  0  0 

2  77  CC 

*>'.V 

2  7  o  C  0 
2  79  C  0 

s>- 

2c0CC 

."-.V 

V 

2  91  0  0 

■  *>  ' 

2  92  CO 

<v>! 

2  9  5  0  0 

2  a  *  0  C 
2  35  C  C 
2  36  00 
2*700 
2  oe  C  C 
2  39  0  0 
2  3C  r  0 


• 

291  C  3 

2  92  C  C 

te 

2  93  CG 

2  i*  0  0 

2  95  0  Cl 

v‘v 

2  96  0  0 

fcv’v 

2  97  C  C 

2  96  C  C 

<;  x9  0  C 

.  •  w  * 

A*  / 

5  CO  CC 

5  0100 

3  02  CO 

-V*. 

A  A 

5  03  00 

. 

im 

i  0*  C  0 

5  05  0  0 

can  UfOOUMl,  IM2,  J(*l,  j  m  2  *  YM 
EV31F 

►:l:c  ip  (Mcasf  .eg.  *>  the\ 

:r  ( *:C  iCE  .EG.  1)  T  he  h 
'-cell  vertical.  DO-inaar/. 

XI  =  xcClC 
*2  :  XC--EW 
X3  =  X?  t IP) 

Yi  =  TCOuC 
Y2  =  Y2’.'E  w 
I  '■*  1  =  IC  -  1 
1*2  =  I' 

J-'i  :  jC 
Ju.  p  JO 

C2LL  I  f.  T  E  9  F  (  x  1  ,  Y  1  ,  >2,  Y2*  Y  1  ) 

-  " l L  1*2,  J“l,  JM0  f 3  ,  “ 

.'-Cell  vertical  L  O  -i  n  Car/. 

Y]  =  J20LD 
*2  -  VC '.El. 
i  •'  I  =  i  u  -  1 
i  v.  =  :  j 
j  v  i  =  j . 

A  *  *.  —  J  v 

i  N  r  E  »  »  (  x  1  ,  VI,  A  2  <  f  2  ,  X  3  ,  v  3 ) 

-  “  L *  3  « ■  I  E  < I H 1  ,  I«2,  J"1  ,  J  M  £  ,  y  1  > 


•-LC,  IP  IVCACE  m.  2)  T  -  f ') 

C  h  f  c  K  for  tuth. 

<i  =  x-'ll: 

*’  2  p  X?-.E« 

*5  =  x-(l-) 

Y  1  =  Y  ~  0i_  ' 

Y  2  :  YMfE* 

''ALL  INTEc°(y’,  v  1  *  X  2  *  Y2,  X  5  ,  Y3) 
IF  (Y5  .IT.  Y  :;  <  j  -  )  )  Tnl'Y 
l  O  »E  9  =  1 

E  U  :  E 

L  C  «  E  9  :  0 

E  I  p 

0-Cell  vertical  Dojnajrr. 

Yl  =  TOOLD 
YE  =  T"f,rw 
I  '  1  =  K.  -  i 
I  -V  -  I  " 

JVI  =  Jr 
Jv.  P  j: 

*  “  *-  *-  I'«TE9P(xi,  yi,  »2,  Y2,  xi,  Y3> 
'-ALL  C  u  O  E  (  I  *  1  ,  I  u  2  ,  J  *  1  ,  _P»2,  r  2  > 

l-C-ll  vertical  DounCar/. 

m  p  veil: 

ye  p  VD6 E* 

1  V  1  =  IV  -  1 
: "2  =  :  V 

If  (  L  O  *  E  9  .Ej.  1)  T-*E\ 

uMl  =  J  V  -  l 

•f‘2  p  JV  -  1 
Eu:r 

a**  1  P  JV 
Jv2  p  JV 
E  '.El  F 


i'yiy 

XX: 


v  •,  v  */  %  “p.  V  V  A  /.  %  A  A  A  -A  Ji  AjA^x  */»  A  »  '  .  *  A  V  V  V  V  r  v-  r  x  <-  *  .  « 


vv 


3  Ob  00 

C  ILL  INTERP(Xi,  Yl,  X2,  Y2,  X3,  Y3) 

3  07  QQ 

CALL  VM0Q(IH1.  Ift2t  Jftl,  Jft£,  Y3) 

3  06  C  C 

c 

V-cell  horizontal  boundary. 

3  09  CO 

XI  =  YSCLC 

3  10  CO 

X  2  =  YDNEiV 

3  110  0 

<3  =  YE.  (JH) 

3  12  0  0 

IF  (  LOWE 9  .EQ.  1)  thE.N 

3  13  CO 

I ft 1  =  IV 

3  1*4  C  0 

I M  2  =  IV 

'  13  0  0 

ELSE 

3  16  0  0 

IM  =  17  -  t 

3  17"0 

:  *2  =  :v  -  i 

3  16  CO 

E  '.51  F 

3  1 9  o : 

a  ft  1  =  J7  -  1 

,  .  .  .  . 

3  210  0 

"ALL  :  \ T  E  =  P ( X 1  ,  Y1,  X 2 ,  Y  2 ,  X  3 ,  Y3) 

3  22  0  0 

:-LL  V  ft  0  3  <  I 1  .  I  ft  2,  J  4 1 ,  J  M  2 ,  Y  3 ) 

?  C3  r : 

r 

3  24  C  0 

ELS"  Ic  ('.CASE  .CO.  3)  ThEN 

*  C  C 

c 

7-cell  horizontal  boundary. 

3  2  fc  0  0 

<1  =  Y  3  r  L  E 

3  27  CO 

O  e  YC.E.V 

3  2«  C  0 

Yj  =  Yn(J6) 

3  25  00 

Y  1  -  VS'OuJ 

3  30  0  C 

\c  -  V SLEW 

331  00 

I  ft  1  =  IV 

3  32  0  0 

IM£  =  IV 

3  33  00 

JM1  =  JV  -  i 

3  34  0  0 

oft:  =  jv 

3  35  0  0 

CALL  IMERP(X1  *  Yl,  x2  »  Y2t  X  3  *  Y3) 

3  3b  0  0 

CALL  yftOCXIftlt  I  ft  £ ,  Jftl,  Jft2,  Y3) 

3  37  0  0 

c 

3  3ft  0  0 

ELSE  IF  (’.CASE  .  E  S .  4>  THEN 

3  35  00 

L 

d-Cell  vertical  bounoary. 

3  40  0  0 

A  1  —  )(  Jvlw 

3  41  C  C 

x  «_  -  X  c  N  E  lx 

3  42  00 

X !  r  ah ( I B  ♦  1  ) 

343  CO 

Yl  =  UCGLC 

3  44  0  0 

y  2  =  l:\ew 

3  45  OC 

pm  =  i  -j  ♦  i 

3  46  CO 

I  *' 2  =  IJ 

3  47  0  0 

JM1  =  J  L’ 

3  4=00 

aft:  -  J  a 

3  49  00 

CALL  I  f.T  E  ft  p  (  X  1  ,  yi,  x2,  Y  £  ,  X  3  ,  Y3> 

350  00 

Cai.L  aftr-C(I“l,  I  ft  £  ,  jftl,  J  ft  2  ,  y!) 

331  0  0 

c 

V -Cell  horizontal  boundary. 

3  52  0  0 

xi  =  y::.o 

3  53  0  0 

<  i  -  Y  j  \  £  A 

3  54  0  0 

X  3  -  Y  Q  (  J  H  ) 

3a3  00 

yi  =  v:cw3 

3  56  0  0 

YJ  =  VC’.EW 

3  57  00 

I'M  =  IV 

3  56  0  0 

I’M  =  IV 

3  5*00 

Jftl  =  J  V  -  1 

3  bO  OC 

Jft£  =  J  J 

3  b  1  00 

C-LL  IME  =  P(<1.  Yj,  x?,  y2,  X  3  •  y«) 

3b2  00 

CALL  V  w  Q3  (  I M 1 ,  1  ft  2 ,  Jftl,  J  ft  2  ,  Y  3  ) 

3  o3  00 

c 

3  64  00 

ELSE  I r  ('.CASE  .EC.  5)  THEN 

3  65  0  0 

J— cell  vertical  ”  o  u  rt  O  d  r  y  • 

3  6b  0  0 

A  1  —  ^  J  tu  a 

35.99 

mJ*  "*****v,'"w,,'"«*  "j*  's'" /*“•«■  %*  *  *  *»*  \* " 

•'  ,  .  •'.»’«  ft",  ^ ■  ’'* «  ft* .  ft’  «  *fc.  •*,  “"-l  *%  ** 

367  00 

X  2  =  X3NEW 

368  00 

X  3  =  XR ( IB  *  1  ) 

3  6900 

Yl  =  UCOLO 

3  70  00 

Y2  =  U3NEU 

3  7100 

IM1  =  IC  ♦  1 

3  72  00 

I  M2  =  Iu 

3  73  0  0 

JW1  =  JU 

3  74  00 

J  H 2  -  Jj 

3  75  00 

CLLL  I\TLRP«X1,  Yl,  x  2  «  Y2,  X3,  Y3> 

3  76  00 

C3LL  U  M  G  'J  (  I  M  1  »  I  M  2  •  J  M  1  »  J  u  2  »  Y3) 

3  77  00 

ELSE  I  f  (NCACE  .EC.  6)  Th£n 

3  78  0  0 

C 

Chec  x  for  Doth. 

3  79  00 

xi  =  x  j  O  L  3 

3  30  00 

X  2  =  xE'.Ew 

3  810  0 

x  3  =  X1-  c  I  Q  *  1  ) 

3  o2  00 

Y  1  =  Y  3  O  L  D 

3  83  CO 

y  2  -  y:\ew 

3  59  0  0 

call  INTERP(X1,  Yl,  x  2  »  Y2,  X3,  Y3) 

3  95  0  0 

I  -  <  Y3  . L  T.  Y?  <  J°  ♦  1 )  )  THEN 

3  o  b  0  0 

L  O  >,  ER  -  1 

3  37  CO 

LLCE 

3  3o  00 

L  3  n  E  8  ~  j 

3  99  0  0 

e\:ic 

3  70  CO 

c 

u-ctl l  vertical  DOunnar/. 

3  9100 

Yl  =  o  3  CL  3 

3  92  00 

r?  -  _::.E  w 

3  93  00 

I  •'  1  =  Iu  ♦  1 

3  59  GO 

I  *  u  =  U 

3  95  CO 

IF  <  L  C*  t 8  .EG.  1)  THEN 

3  96  0  0 

UM1  =  Jl 

3  97  CO 

Ju2  -  JU 

3  9e  00 

E  L  CL 

3  99  00 

JM1  =  JU  ♦  1 

9  OOOO 

0*2  =  JU  *  1 

9  01  00 

r-.:ic 

9  02  00 

:cLL  I  N  T : R  =  <  X  1  .  Yl,  x  2 ,  Y2,  X  3  ,  Y3) 

9  03  0  0 

CLLL  U*  03  « I  Ml ,  I v  2  *  J  M 1 ,  JH  2 ,  r  3 ) 

9  09  00 

£ 

C-C<‘ll  horizontal  DOundary. 

9  05  0  0 

XI  =  Y3CLD 

9  Ob  C  0 

x  2  =  Y  3  U  E  W 

9  07  0  C 

X3  -  Yj(J“  .  1 ) 

9  08  00 

Yl  -  T30L3 

9  09  C  0 

Y2  =  T 3 NE  W 

9  10  C  0 

I  1  =  I  C 

9  110  0 

I "2  =  IC 

9  12  0  0 

JV1  =  JC  ♦  1 

3  13  0C 

Jv^  =  J  c 

9  19  0  0 

C  L  L  L  INTER3)  Xl  ,  Yl,  X2,  Y2,  X  3 ,  Yj) 

9  15  0  0 

CLLL  CMCDtIMl.  Iu  2 ,  J  M 1 ,  J«2,  Y3  ) 

9  16  0  0 

r~ 

o-celt  horizontal  Round ary. 

9  17  0  0 

Yl  =  UJ^LD 

9  la  00 

Y2  =  U3NE* 

9  19  00 

Ic  (LOWER  .EG.  1)  THEN 

920  0  0 

I  ” 1  =  IU  *  1 

9210  0 

I  *  2  =  I  U  ♦  1 

9  22  C  0 

LLCL 

9  23  0  0 

IM  1  =  I U 

9  29  0  0 

I«2  =  IU 

9  25  0  0 

ENCi  F 

9  26  0  0 

J  M 1  =  JL  ♦  1 

927  0  0 

J  M 2  =  Ju 

35.100 


^thvW»'V%'  V  *  V  V  %*  V  V  VV  V  ^  V V  V  V  /  /  .*/.■  /  V  V--  -w  .*  .* 
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\v\>  % 


4  28  0  0 
4  29  OC 
4  30  00 
**31  00 
4  32  0  0 
4  33  0  0 
4  34  0  0 
4  35  00 
4  36  G  0 
4  37  0  0 
4  3o  0  0 
4  39  0  G 
4  40  0  C 
4  4  10  0 
4  42  00 
4  43  0  0 
4  44  C  0 
4  45  0  0 
4  46  00 
4  4  7  0  0 
4  4600 
4  49  00 
4  50  0  0 
451  00 
4  52  0  0 
453  00 
4  54  0  0 
4  55  0  0 
4  56  00 
4  57  00 
4  5o  0  0 

459  C  0 

460  0  0 
4  61  CO 
4  62  0  0 
4  63  0  0 
464  0  0 
4  65  0  0 
4  t>6  C  C 
h  67  C  0 
4  6e  G  C 
4  69  CO 
“  70  00 
“7100 
4  72  0  0 
4  73  0  0 
4  74  0  0 
4  75  CO 
4  76  00 
4  77  C  0 
4  7e  0  0 
4  79  OO 
4  30  00 
4  SI  CO 
462  00 
43300 
4  34  C  0 
4  o5  0  0 
4  66  0  0 
4  37  00 
4  38  0  0 


CALL  INTtRPC  U»  X  2  »  Y2,  X3,  Y3> 

CALL  UMODlIfl*  1*2,  Jll,  JM2»  Y3) 

ELSE  Ic  ('.CASE  .EC.  7)  T«En 
C-cell  horizontal  DCunaary. 

XI  =  YCOLD 
X  2  =  YDNE  W 

X  3  =  Y  E  <  J  q  ♦  1) 

Y  1  =  I  DC^J 
Y2  =  TCNEn 
I  v  1  =  I  c 

T  V  2  -  l  r 

J  M 1  -  J  ♦  1 

j-c  =  j: 

C-lI  1NTE»P(X1,  fl,  x  2  »  Y2.  X  3  ,  Y3) 
CALL  C“CC(IW1.  Iv2,  J«l,  J«2,  Y3) 

u-Ct  L  l  norizontal  LOuncary. 

Y  1  =  UDCLD 

Y2  =  CICVE- 
1-41  =  U 

I  WL  =  1  J 
JY1  -  ♦  1 

JM2  =  JU 

CA^l  IMERPIXl,  Yl,  a  2  ,  Y2*  X  3  *  Y3) 
CALL  UVOCdM,  1*2,  J«l,  JM2,  Y3> 

ELSE  Ic  I'.CACE  .EC.  H )  T-ENJ 
C  h  e  c  «.  tor  ooth. 

XI  =  XC0LD 
XC  =  XCCCW 

x  3  =  X  c  (  I  ft  ) 

Yl  =  YCOLD 
Y2  =  Y  C  N  E  w 

CALL  :%TE°PtXl,  M,  X2*  Y2*  X3*  y3) 


CALL  :%TE°P1X1,  yi,  x  2 , 

IF  (Y3  .  lT.  Y  :j(J3  *  1))  HEN 
L  J "E  :  =  1 

el;e 

lower  =  c 
:%z  l  R 

C-cel  l  vertiCdl  DOvncary. 

Yl  =  TCCLD 
Y2  =  TCjEw 
I  1  =  I C  -  1 
I  UC  =  IC 

Ic  (  LOWE  a  1  )  THEN 


o"  1  =  aC  4  1 

J v2  =  JC  ♦  1 
EC- IF 

CALL  IMESPt  XI  ,  Y  1  ,  x 
CAlL  CKCCtIMl,  I !« 2  *  J 
7  -  c  “  l  l  vertical  tjounaary. 
Yl  -  v D O . D 
<i  -  VECEw 
:vi  =  iv  -  i 
l»c.  =  IV 
JW1  =  JV 
V  VC  =  J  V 

call  I\ T  E  p P ( X 1  ,  Y  1  ,  X 


x  2 ,  Y2,  X  3  ,  Y3) 
J  3 1 ,  J«2 ,  y  3 ) 


35.101 


X.  -r"'  -  -  «.•  ■/  •.  • 

■  .  *  _  •  L.  *'  -  *»•  *  "  »*!,“«*'»  ” 


1  .  ■»  .  "■  .  •  .  '  4  ’”«*  **4  ^*4  ^*4  •  «  ’  >  '  %  •  ■ 

-**"-  **»«  _»■  ■»  .r  •  _>*  » 

'  ./  ./  -  r  ;  *. 


*♦89  0  0 

CALL  Vf*00(I*l»  I  f*  2  .  J“l.  J  “  2  »  73) 

4  90  0C 

c 

C-cell  horizontal  bounaary. 

“91  CC 

XI  =  YC0L2 

“  92  C  0 

Xt  =  YCNErf 

“95  0  0 

X  3  =  Yb  <  JB  ♦  1  > 

4  94  0  0 

Y  1  r  TCOLD 

4  95  0  0 

Y  2  =  TCbCtf 

4  9t>  00 

IF  (LOjEft  .£0.  1)  T-t£'4 

4  97  00 

IM 1  =  I  C  -  1 

4  9c  0  0 

i«2  =  IC  -  1 

4  99  0  0 

CLCC 

o  Q  0  0  0 

I M  1  =  IC 

5  01  CO 

I  u  2  =  I  C 

5  02  0  0 

£■.:  if 

5  03  3  0 

JV1  =  JC  *  1 

i  04  0  c 

J  Me  -  ^  C 

i  05  C  G 

CALL  IM£°PfXl,  Yl,  Y2,  Y2,  X3,  v  < , 

5  06  0  0 

CALL  CNCOllfMt  1  M  2  *  Jf»l,  J92*  Y  ?  ) 

5  07  0  0 

c 

a-cell  horizontal  oounoary. 

3  Ot  CO 

Yl  -  lCJlC 

3  05  C  0 

y;  = 

5  10  C  0 

I  Yl  =  12 

3  110  0 

iM<  =  u 

512  00 

J“  1  :  Jo  ♦  1 

5  13  0  0 

J  y?  =  JL 

5  14  0  0 

CALL  :-.T£5P(Xlt  Yl,  X2,  Y2,  X  3  ,  Y  i) 

5  15  C  C 

CALL  C'OKlXlt  I  *4  2  *  J  Y  1  ,  JM2  ,  ro 

3  1  b  0  0 

c 

317  CO 

r  r  ’  c 

-  ■  —  4 

5  le  00 

f 

5  19  00 

c 

5  20  0  0 

1 P  Ou  C  :  I r 

521  CO 

Jh.ClC  R  Jp 

5  22  0  0 

XjOlC  =  X  C \ £  A 

3  21  OC 

YCOLj  a  Y : L  L  4 

5  24  0  0 

re  re  =  refit* 

5  25  GO 

rCLC  =  LCAE* 

3  2b  0  0 

2  a  j  -  \J  EJ\E  A 

3  27  C  C 

IOTlP:  a  I5T-CPC  *  1 

5  2500 

Ir  (  I  £  T  £  P  j  .  5  T  .  Mfiy^TP)  THEN 

;  29  l  0 

t-(5,  •>  •  efrts  £xc'r:£:  coa  •.  \pc9t 

3  iC  0  0 

*--ir<£,  •>  •  x  =  »,  x co l : ,  *r-',  >:ol:,  mco.'.t 

3  1100 

£  L  0  £ 

5  32  OC 

*•<  i  r  (?2,  • )  x-nL: ,  ycol; 

3  33  0  0 

-■  ,  T  C  ICC 

5  34  C  U 

£  5  C  1  F 

5  35  0  C 

; 

“u  m  the  e  n  C  of  oath. 

5  3600 

*>  c  0 

COM  r.„E 

5  37  0  C 

C  v,  Y  v  Y  :  -  1  .  0 

5  3c  0  0 

*  - i r  £  •)  olyvy 

539  0  0 

c 

5  40  0  0 

c 

=  e -  initialize  the  soarce  ten’s  for  the  last  cell  a 

5410  0 

r 

0  r  oo  let  leaves  the  flow  3  o  rr  a  1  3  . 

542  0  0 

c 

543  00 

ClLTA  ;  e.O  •  PI  •  -hOL  •  &AC  ••  5  /  3.0  •  CcFR£0< 

5  44  0  0 

c«CfU  1  .,J  J  a  P'Of.'UljiJU)  -  0  £  L  T  A  .  lOI  '.I  T(  NPOST 

5  45  C  0 

4»-oyv(  :  j,jv)  -  ^oivi  iv.jv)  -  celta  .  vcimt<vpc°t 

5  4b  0  0 

c 

547  0  0 

1  0  c  c 

CONTINUE 

5  4600 

CALL  :ovPA° 

549  00 

c 

Hark  the  ena  of  file. 

.:r .T'yj1  "~y  1 


*  *  V  -4  1  ■■% 


■s. 

CvJ 

$ 

r.v 

r.V 

I 


550  0  0 

551  00 

5  52  0  0 
5  53  0  0 
5  5*  0  0 

555  0  0 

556  0  0 
5  57  C  0 
3  5a  0  0 
5  59  00 
-  60  C  0 
lolOO 
362  G  0 
563  0  0 
3  6*  0  0 
5  o5  C  0 
3  6b  0  0 
567  C  0 
3  oo  0  0 
5  69  0  0 
5  70  0  0 
5  71  QC 
5  72  0  0 
5  73  0  0 
5  7*00 
5  750  0 
3  7b  0  0 
5  77  0  0 


3bHM  y  :  -11.0 

write:  (22,  *)  C'L**y 
CLOSE  (iMT  =  22) 

9  c.  T  o  9  '• 

EL  3 


3 or  9  03 T  I \E  SC  MC  hk 

Checks  if  the  Sc0p  is  within  the  finite 
citfererce  ’"h  rectangle. 


;?:/  uixPC9  ,  *.p r=  t. 


=  9  ;r.  \  ( i :  > 


' *  l  9  f  :  i  i  ( i : ) ,  c c  c  = r  s ,  i : , , 

t  *o:-.:t<ic),  YriMTdC),  tsilitu;,,  lcimtuo,  ..immi  ■>, 

i  <-( ilI ,  T  r  <  *  '  I  , 

1  ~  ,  ‘  *  )  ,  J  0  (  *  '  «  L  *  )  *  ujCl?  (4  ■  I  2  *  )  ,  Y^-OLCl*-,  2  C  )  , 

k  CSS*  *9 iy  X  *  '9  ivy*  *iC*  9^0030*  PI*  tG3C,  JG4S, 

1  *_oL-«  f-uL_*  T-LLo,  ^  C  0  _ 3  *  w 0  0  L  3  * 

1  7  _  E  w  »  7S  Lew*  l:\ik*  V  S  \  L  »  , 

i  .  T ,  .  7  I l.  C  *  S  7  ■<  E  0  *  ->  -1  C  L  * 

5  :  C  7  s ,  :-.7C7=,  lrL3r,2,  >I’f  W3XSTP,  *3  <CT.  IS  7ft'., 

i  *-*  o^,  I  V  *  o‘J*  Li  oo*  I  -  *  j  -  ,  IfcGi_3*  J  ‘  •  0  L  3  »  ;  C ;  v  i  '  , 

S  « C  3  S  E  <  WC  33E ,  J3M3X«*-»,  LSI*  \3J 

IP  C*.LE-  *:-T.  X  ■  (  2  *  m  -  1)))  T  he  G 
w  I  7  c  t  o  ♦  »  )  *  ^  ~  G  P  o.E9-T3^^SlLES  9  I  GhT  • 

I R  I  7  =  J 


5  78  0  0 

else  :r  < x ; e « .  l t .  <-<->)  t*e\ 

5  79  CO 

«JiTcL,  *>  •  8  E  V  E  9  s  E  F_J*3  if  E  5  !8Ar.CE« 

580  00 

Ihit  -  : 

5  3100 

ELSE  :r  (  Y  S  LE  1*  .  Lt.  y:1(S>)  T  hi 

5  92  0  0 

<*9  I  7  f  (  5  ,  .)  •  FLOW  "9  :sCEC  3  *  I  C  • 

5  o3  0C 

i  >i  1  7  z  > 

5  5*00 

ELSE  IF  <YS’,E„.  07.  Y!m2  •  «'iU  -  1>))  Thf 

5  85  00 

« 3 1 t e  1 5 ♦  •)  »  : 9  o p  cje  =  -  79  3  .elle:  j  ’ 

5  s  fc  C  0 

I  ~  I  T  Z  H 

337Q0 

Ll.SE 

5  85  0  0 

1-17  =  c 

5  8  9  0  0 

e  . :  i  f 

590  0  0 

w  r  T  j  q  »t 

3  1 1  0  0 

ESC 

592  0  0 

c 

5  93  0  0 

•  •  • 

5  9*  0  0 

j  95  0  0 

wi  ^  l  “*  u  w  A  *  C_  r  1  3  «  " 

5  3b  C  0 

f  i  n.2  s  Ir,  Jh,  IC,  JC.  IL,  ju*  I  \I  uvj  f  j 

5  37  0  0 

£ 

new  -cell. 

598  0  0 

c 

3  n  00 

CL'V,  /.909S/  Y3AP09,  LP 1 9  T  * 

b  00  C  0 

1 

:-FSr-«iCi,  "fpjI3(1i'),  :s«s:t,ic),  ;  =  flt 

b  0  1  0  0 

i 

<::M7(ic),  v:  1017(10),  tsimtiic),  cSim 

6Q2  0  0 

a  •;(  ;c  )  .  Y  l;  <  *  *  )  * 

b 03  C  0 

r 

»  j  <  *  '  *  <-*)*  J  0  t  *  L  *  2*),  .f>CLC»*3,  2*).  V  G ! 

6  0*00 

t 

-  R'-  *  1  H  -  f  A  »  ■ -  A  V  y  ♦  ^  i  i  HOG  w  j  <  l3A*G* 

6  05  0  0 

i 

'SOLS.  rE  0L3.  T-OL",  .jSOLS,  VSOL", 

o  0b  0  C 

t 

^  -  1  -  m  T  3  *-«  E  *• »  \»  3  '<  i  m 

607  0  0 

i 

- 1  *  -  t  r.c ,  :  79E3,  * r cl  * 

b  08  0  0 

t 

i  STEPS.  I'.TCTB,  I  f  L  3  02  ,  InlT,  *i)sTF*  < 

6  09  0  0 

i 

*-t  Ju  i  I  v  f  j'/^  iui  JUf  j“*  i  hcl:  *  j  "  i 

c  10  0  0 

i 

1  C  -  G  -  i  ^  C  A  j  l  »  o  w  -  «  *  (  *♦  c  )  i  ^  u 

.  7  I  N  T  T  (  1 

L  *  )  * 


)  I 


CL' 


7  , 


35.103 


, 

>.V  V.  \L 


•L  ••.  s. 


J  *  - - -  - 


6  72  0  0 

IF 

<AbS«IB  -  I60L2)  .GT.  1)  TnC\ 

673  00 

;  t  = 

OTfiFC  .  cr 

o  70  0  0 

19  = 

1  U0L2 

o  75  0  0 

JO  = 

joO  lC 

e>  7b  0  0 

I  N  T  F  L 

G  =  1 

b  77  0  0 

-5  7^6 

\ 

o  76  C  0 
o  79  0  0 

-  '■ 

Zlc 

b  8  0  C  0 

IF 

<  At-  5 

<  J  b  -  J  ~  0  L  C  >  .GT.  1)  TmlN 

a  31  00 

2  T  a 

J  T  =  FT  •  2  T 

o  82  C  0 

i  T*  ~ 

i c  l  : 

a  o  3  0  0 

JO  - 

O  ’  C  lZ 

b  8  4  0  G 

I*.  Tf  L 

G  =  1 

a  35  C  0 

H1  T  ^  ** 

r. 

6  66  0  0 

?  I  r 

a  e  7  0  0 

t>  66  0  0 

- 

l  L 

(  I  - 

.  t  0  .  I  r  C  L  ",  )  T  h  •  \ 

6  8900 

IF  (  a 

.  r  0 .  j'-GOI)  THf_\ 

o  90  C  G 

-  T 

=  :  t;*/  *  r 

a  9 1  0  0 

I  .. 

-  1  -  at  " 

b  92  C  0 

J.' 

-  -:CL‘. 

b  33  00 

I  .  T 

caG  =  2 

6  9<*  0  G 

-  L  T 

o  35  0  0 

L  ..IF 

b  9to  G  G 

(  *t 

:  i 17 

b  3  7  0  0 

a  98  C  0 

: 

• 

T  -  L  '• 

-  - 

a  99  0  C 

-  : 

Tv-  ( 

7  0  0  C  0 

7  010  0 

- 

-  '* 

- 

7  02  0  0 

'  •  *  * 

*  •  •  •  • 

*  • 

/  03  OC 

7  0<*  C  C 

- 

:•  A  -  w  I 

I'.l  ci\:\ 

7  05  0  0 

-  H 

tarns 

•.nr  vuUr  o<  'ICAO:  torreiconelmj 

7  Ob  0  0 

r 

t  O 

the 

\  :  “  r.  t  1  t  y  of  t  hr  ne1(;ncur  ing  trll 

7  0  7  C  0 

Z 

t  n 

at  t  h 

e  .  -  OF  trivms  to. 

7  :s  c  o 

7  09  0  0 

V  •■J 

\A  M  "  *t 

/C-GFG/  “  A  .  c  f  .  -,p  os*. 

7  10  0  0 

1 
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SiC  FIBER  REINFORCED  GLASS-CERAMIC  COMPOSITES 
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Charles  H.  Drummond  III 
Department  of  Ceramic  Engineering 
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The  silica  was  added  to  the  composition  in  the  form  of 
commercially  available  SKO^H^)#  (TEOS).  The  organic  solutions 
were  dropwise  acid  hydrolyzed  in  water.  In  order  to  study  the 
matrix  material  only,  part  of  the  slurry  was  vacuum  dried.  The 
dried  material  was  then  calcined  in  air  at  600°C  to  remove  the 
bulk  of  the  organics  from  the  material.  The  calcined  material 
was  vacuum  hot-pressed  into  inch  round  discs  which  were  evaluated 
by  XRD.  The  samples  were  then  cut  and  polished  for  4  point  bend 
testing  and  Indentation  toughness  using  the  Marshall,  Noma  and 
Evans  indentation  toughness  methodJ 

The  materials  not  processed  into  discs  for  the  matrix  material 
studies  were  slurry  coated  onto  fibers  which  were  then  dried  and 
calcined  to  450°C  prior  to  vacuum  hot-pressing.  These  composite 
samples  were  evaluated  for  XRD.  The  study  at  this  point  is 
incomplete  in  the  areas  of  composite  mechanical  properties.  TEM 
studies  are  also  planned  for  the  composite  and  matrix  only 
samples. 

COMPOSITION  SELECTION 

Composition  ZSPIN  lies  nearly  midway  between  cordierite  [2MgO- 

2A1203*  5Si02]  and  spinel  [MgAl^l  for  its  magnesia,  alumina  and 

silica  content.  The  second  composition  studied  was  ZCOR  which 

had  a  magnesia,  alumina,  and  silica  content  corresponding  to 

stoichiometric  cordierite.  ZMAS  and  MAS  compositions  contained 

excess  silica  beyond  stoichiometric  cordierite.  These 

compositions  are  plotted  on  the  magnesia,  alumina,  and  silica 

o 

ternay  phase  diagram  in  Figure  1. 

The  MAS  (magnesia,  alumina,  and  silica)  system  has  been 


detailed  by  McMillan  3  to  yield  particularly  high  strengths 
when  formed  into  glass-ceramics  .  The  oicrostructure  of  glass- 
ceramics  generally  produces  a  very  fine  grained  and  dense  material 
with  superior  strength  to  ceramics  formed  by  traditional  powder 
processing  methods.  The  MAS  system  contains  minerals  that  form 
platey  and  elongated  grains  that  further  enhance  the  strength 
due  to  the  microstructure  of  the  resulting  glass-ceramic. 

It  has  been  shown  by  Faber  and  Evans  ^  that  the  interweaving 
structure  of  elongated  grains  produces  enhanced  strength  and 
toughness  over  the  same  mineral  phases  developed  with  lower 
resulting  aspect  ratios.  Cordierite  [ 2 MgO*  2A1 2^3' 5S102 ]  is  an 
example  of  a  mineral  capable  of  forming  platey  and  elongated 
grains  consistent  with  the  Faber  and  Evans  model. 

The  thermal  expansion  of  cordierite  is  less  than  the  SiC 
fibers  used  in  the  composite.  The  choice  of  cordierite  in  the 
matrix  was  to  enhance  the  formation  of  residual  compressive 
forces  in  the  matrix  material  while  distributing  the  tensile  load 
to  the  fibers.  Spinel  was  chosen  as  a  possible  second  phase  in 
the  ZIPIN  composition  due  to  its  higher  tensile  strength  than 
cordierite. 

Each  of  the  compositions  in  this  study  contained  additions  of 
ZrOj.  These  additions  were  intended  to  act  as  a  nucleation 
catalyst  and  as  a  means  of  transformation  toughening  to  the 
matrix.  It  was  understood  in  this  study  that  critical  conditions 
for  successful  transformation  toughening  were  not  optimized.  The 
grain  size  and  amount  of  the  tetragonal  zirconia  phase  are 
examples  of  two  critical  parameters  regarding  the  toughening 
mechanism  that  were  not  optimized  in  this  study. 
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PHASE  DEVELOPMENT  IN  THE  MATRIX  MATERIAL 


m 


Experiments  determined  that  the  first  phases  formed  from  the 
starting  ZSPIN  composition  (without  SiC)  glass  were  spinel, 
sapphirine  (a  spinel  type  structure  with  formula  MgyAl 1 8Si3°40 ^ 
and  the  tetragonal  form  of  zirconia.  These  phases  formed  at 
temperatures  of  about  600°C.  Zircon  and  cordierite  formation 
were  observed  at  1300°C  or  greater.  This  temperature  for  zircon 
formation  is  consistent  with  the  study  of  Conrad^  regarding  a 
glass-ceramic  with  a  1 0  X  Zr02  content  and  a  magnesium 
aluminosilicate  composition  between  ZSPIN  and  ZCOR.  The  amount 
of  zircon  formed  was  found  to  increase  with  prolonged  heating. 
After  over  an  hour  at  1300°,  only  about  half  the  zirconia  had 
been  transformed  to  zircon.  The  amount  of  cordierite  appeared  to 
decrease  as  zircon  was  formed.  Both  cordierite  and  zircon  form 
at  the  expense  of  sapphirine. 

Kinetics  appear  to  favor  the  formation  of  spinel,  sapphirine 
and  tetragonal  zirconia  for  the  ZSPIN  composition.  Sapphirine 
is  similar  in  composition  to  cordierite  and,  therefore,  likely 
enhances  the  kinetics  of  .cordierite  formation  in  the  ZSPIN 
composition.  Zircon,  though  favored  in  a  free  energy  analysis,  is 
slow  to  form.^'^'®  From  additional  heatings  at  1  300°,  it 
appeared  that  zircon  and  spinel  would  be  the  predominant  final 
equilibrium  phases.  The  kinetics  of  the  zircon  formation  appear 
to  be  the  rate  limiting  process  in  the  reactions  occurring  at 
temperatures  above  1250°C. 


The  objective  of  the  composition  ZSPIN  was  to  develop 
spinel,  cordierite  and  zirconia  in  the  tetragonal  structure. 
Equilibrium  conditions  would  likely  not  allow  the  coexistance  of 
these  phases  for  the  ZSPIN  composition.  The  difference  between 
the  more  rapid  cordierite  formation  kinetics  and  the  zircon 
kinetics  was  not  sufficient  to  form  cordierite  without  a 
significant  amount  of  zircon  for  the  ZSPIN  composition  utilized 
in  this  study. 

The  ZSPIN  matrix  material  strength  (no  SiC  fibers  added)  in 
a  4  point  bend  test  showed  the  strength  decreased  rapidly  as  the 
cordierite  and  zircon  phases  formed.  The  samples  with  spinel, 
sapphirine  and  tetragonal  zirconia  phases  exhibited  22  to  24  KSI 
strength  with  up  to  2.2  MPam^^  toughness.  Bend  bars  with  spinel, 
cordierite,  zircon  and  the  remaining  tetragonal  zirconia  had  only 
7.5  to  13  KSI  strength  with  the  toughness  values  averaging 
approximately  1.6.  This  strength  degradation  can  be  readily 
explained  when  viewing  a  polished  matrix  material  sample 
magnified  at  100X.  With  the  formation  of  zircon,  a  large  number 
of  lignificant  flaws  were  readily  apparent  within  the  samples. 
Zircon  represents  roughly  a  20 %  density  increase  over  spinel  (or 
sapphirine)  and  a  30X  density  increase  over  cordierite.  No 
appreciable  shrinkage  occurred  during  hot-pressing  in  the 
temperature  range  of  the  zircon  formation.  It  is  apparent  that 
the  formation  of  the  higher  density  zircon  phase  caused  the 
resultant  flaws  observed  on  the  low  strength  samples. 

Experimentally,  ZCOR  and  ZMAS  compositions  were  found  to 
contain  primarily  cordierite  with  tetragonal  zirconia. 


At  1300°  and  above,  zircon  began  to  form.  This  pattern  of  zircon 


formation  parallels  the  situation  found  in  ZSPIN  and  the  Conrad 


study. 5  it  appears  that  the  zircon  formation  mechanism  is 


not  sensitive  to  modest  variations  in  zirconia  or  silica  concen¬ 


tration. 


The  transition  from  1250°C  to  1300°C  not  only  introduced 


zircon  but  cordierite  was  observed  to  transform  from  the  to 


the  C<  form.  This  transformation  also  accompanied  the 


disappearance  of  sapphirine.  Tetragonal  zirconia  remained,  since 


the  reaction  to  form  zircon  was  sluggish.  The  tetragonal 


zirconia  content  was  not  only  being  diminished  by  the  zircon 


formation,  but  a  portion  of  the  tetragonal  phase  appeared  to 


become  destabilized  and  monoclinic  zirconia  was  then  observed. 


The  monoclinic  zirconia  formation  at  1300°C  corresponded  to  the 


disappearance  of  sapphirine  and  the  formation  of  spinel  only  as 


the  ternary  component.  Since  spinel  contains  a  higher  magnesia 


content  than  sapphirine,  it  is  likely  that  a  portion  of  the 


magnesia  which  had  been  a  stabilizer  for  the  tetragonal  zirconia 


had  reacted  with  the  sapphirine  to  form  spinel  which  in  turn 


freed  silica  for  the  zircon  formation. 


From  the  compositions  studied  in  these  experiments,  a 


simplified  nonequilibrium  isothermal  ternary  section  can  be 


approximated.  With  MgA^Oq  being  considered  as  a  single 
component  and  the  aid  of  the  Zr02-Si02  phase  diagram  these 


compositions  and  their  resulting  phases  can  be  illustrated 


semiquantitati vely.  Figures  2  and  3  illustrate  the  spinel-zirconia* 
silica  nonequilibrium  ternary  isothermal  section  at  T250°Cand  1300°C, 


k: 


Sapphirine  cannot  be  properly  depicted  on  the  1250°  metastable 
ternary  as  shown  with  spinelf  zirconia,  and  silica  components. 
However,  a  combination  of  spinel  and  sapphirine  appeared  to  be 
present  at  1250°.  Since  structurally  and  compositionally  spinel 
and  sapphirine  are  very  similar  and  the  ternary  provides  a  useful 
tool  in  visualizing  the  phase  development  of  these  materials, 
sapphirine  is  included  on  the  isothermal  section  with  spinel. 

The  metastable  ternary  section  shown  in  Figure  2  indicates 
that  even  though  the  composition  ZSPIN  was  unable  to  form 
cordierite  and  spinel  with  tetragonal  zirconia  without  the 
formation  of  zircon,  a  slightly  higher  silica  content  composition 
than  ZSPIN  may  cross  out  of  the  two  phase  region  between  spinel 
and  zirconia  that  was  observed  at  1250°C,  From  examining  the 
diagram,  it  is  inferred  that  a  metastable  coexistence  between 
spinel,  cordierite  and  zirconia  could  be  achieved  with  a  composi¬ 
tion  of  slightly  higher  silica  content  than  ZSPIN. 

DENSIFICATION 

The  matrix  materials  (without  SiC  fibers)  densified  most 
rapidly  at  1200°C  through  1250°C.  The  final  density  was 
dependent  upon  the  applied  pressure  and  the  rate  of  temperature 
increase  or  hold  time  in  this  temperature  range.  Compositions 
ZSPIN  and  ZCOR  were  the  most  extensively  studied  for 
densif ication  char ac ter i s t  i  c s.  ZSPIN  densified  up  to  95*  of 
theoretical  when  hot-pressed  at  10°C/minute  heating  rate  and  15 
minutes  at  1250°C  under  1100  psi  applied  pressure.  Crystalline 
phase  development  appeared  to  be  unaffected  by  the  applied 
pressure  when  varied  from  0  to  1100  psi.  Composition  ZCOR  was 


extremely  difficult  to  densify.  At  1700  psi  applied  pressure, 
a  10°C/  minute  heating  rate  and  15  minutes  at  top  temperatures  of 
1250°C  and  1300°C,  the  density  appeared  to  be  near  90S  of 
theoretical . 

Densif ication  appeared  to  be  one  of  the  major  difficulties 
encountered  with  the  not  only  the  matrix  material  without  the  SiC 
fibers  but  also  in  the  composite  materials  as  well.  The 
composite  materials  required  a  densif ication  temperature  of 
approximately  1300°C.  This  relatively  high  dens  if ication 
temperature  requirement  also  corresponds  to  a  temperature  range 
that  has  been  reported  by  Mah  et  al  seriously  degrade 
the  integrity  of  the  SiC  fibers. 

In  short,  densif ication  of  the  matrix  material  with  and 
without  the  SiC  fibers  is  a  major  reason  for  the  poor  mechanical 
properties  exhibited  in  the  compositions  studied  and  would  be  a 
significant  barrier  for  their  use  in  any  practical  application. 
A  fluxing  additive  to  the  matrix  composition  appears  to  be 
necessary  in  order  to  overcome  the  densif ication  barrier  of  these 
materials . 

ZIRCONIA  TRANSFORMATION  TOUGHENING 

Comparing  the  strength  and  toughness  of  the  samples  prepared 
in  this  study  with  data  from  a  Claussen1^  study  (shown  in  table 
1),  it  appears  the  transformation  toughening  was  not  realized  in 
these  experiments.  The  low  density  of  the  samples  distorts  the 
evaluation  of  the  effectiveness  of  the  zirconia  toughening 
Since  the  toughness  measurement  was  conducted  using  an  indentor 
method,  the  indentor  location  could  be  chosen  to  minimize  the 


crack  interaction  with  the  porosity.  The  toughness  of  the 
samples  as  well  as  the  strength  appears  to  be  more  consistent 
with  non-toughened  ceramics.  A  planned  microscopy  study  of  these 
materials  should  provide  insight  regarding  the  apparently 


unsuccessful  toughening. 

TABLE  1 :  Strength  and  Toughness 


Primary  Phases  Data  Source  (MPa) 

Spinel, Zr02t  Powers , Drummond  110-165 

Spinel  Claussen]|  180 

Spinel.ZrOgt  Claussen'^  350-500 

( toughened) 

Cordierite,  ZrC^t  Powers , Drummond  60-85 

Cordierite  Claussen]|  120 

Cordierite,  ZrC^t  Claussen'^  300 

( toughened ) 


PHASE  DEVELOPMENT  IN  THE  SiC  FIBER  COMPOSITE 


KIC(MPam1/2 


2.0-2. 4 
2.0 
4-5 


1 .4-1 .6 
1.4 
3 


The  final  composite  was  comprised  of  between  30X  to  50X  fibers. 
The  fibers  were  the  ceramic  grade  Nica  1  or£®.  The  fibers  were 
continuous  and  approximately  13  microns  in  diameter.  The  as 
received  fibers  were  coated  with  a  sizing.  The  sizing  was 
removed  by  a  rapid  heat  treatment  at  under  600°C  before  slurry 
coating  the  matrix  material  onto  the  fibers.  The  heat  treatment 
time  was  less  than  a  minute  in  an  air  atmosphere. 

The  major  phases  developed  in  the  composites  are  illustrated 
in  Figure  4.  The  matrix  compositions  appeared  to  contain  a 
higher  silica  content  than  the  matrix  material  alone.  Since  the 
fibers  used  contained  a  significant  Si02  fraction,  the  higher 
silica  matrix  was  not  surprising. 


The  phase  development  in  the  composites  appeared  to  be 
sluggish  compared  to  the  matrix  material  without  the  fibers. 
Comparing  the  composite  metastable  ternary  at  ISOO'fcwith  that  of 


the  matrix  only  material  (figures  *1  and  3  respectively),  it  is 
apparent  that  the/<  to  <X  transformation  is  retarded  and  the 
zircon  formation  region  is  reduced  in  the  composite  materials. 
The  mechanical  properties  evaluation  of  these  composites  is  not 
yet  complete  to  correlate  with  phase  development. 

It  has  been  shown  by  Brennan^  that  ^205  precipitates  as 
NbC  near  the  fiber  surface  with  a  high  carbon  content  material 
surrounding  the  fiber.  Analytical  microscopy  is  planned  for  the 
composites  fabricated  in  this  study.  Results  are  not  yet 
available  to  add  to  the  observations  made  by  Brennan.  However, 
to  understand  the  driving  forces  behind  the  role  of  the  Nb205  in 
the  formation  of  NbC  or  carbon  in  the  SiC  fiber  composites,  a  Nb- 
Si-C-0  stability  diagram  was  constructed.  By  examining  a  large 
number  of  potential  reactions  between  Nb,  Si,  C  and  0,  a  diagram 
for  the  condensed  phases  stable  at  a  given  oxygen  partial 
pressure  and  temperature  was  constructed.  This  diagram  can  be 
seen  in  Figure  5. 

This  stability  diagram  was  constructed  from  data  available 
in  the  JANAF  thermochemical  tables.^  The  data  available  in  these 
tables  do  not  consider  the  nonstoichiometr ic  character  of  Nb205 
at  high  temperatures  ^  nor  of  NbC.  ^  Intermetal  1  ic  compounds 
of  Nb  and  Si  as  shown  by  Kocherzhinskiy  et  al  also  do  not  have 
available  the  required  thermochemical  data,  therefore,  the  lowest 
oxygen  partial  pressure  region  of  the  stability  diagram  is  left 
unlabled  and  is  therefore  incomplete. 

The  stability  diagram  shows  some  general  trends: 

1.  Carbon  can  be  stable  in  the  presence  of  niobia  and  silica. 

2. Niobia  is  not  stable  in  the  presence  of  its  own  carbide. 


If  both  species  are  present,  this  would  indicate  localized 
variations  in  oxygen  partial  pressure  within  the  composite  exist. 
Such  localized  regions  would  suggest  a  diffusion  barrier  layer 
ex  ists . 

3.  The  oxides  of  niobium  are  not  stable  in  the  presence  of 
SiC.  The  large  free  energy  release  for  the  formation  of  silica 
from  SiC  will  drive  the  niobia-SiC  reaction. 


4.  Silica  is  stable  in  the  presence  of  carbon  and  niobium 
oxides  at  higher  oxygen  pressures  and  stable  with  NbC  at  lower 
oxygen  pressures.  The  coexistance  of  carbon  or  niobia  with  NbC 
is  separated  by  Si02  if  the  SiOg  is  acting  as  an  oxygen  or  carbon 
diffusion  barrier. 

The  stability  diagram  agrees  with  experimental  evidence  by 
supporting  the  potential  existence  of  carbon  between  the  SiC 
fiber  surface  and  the  matrix  material.  NbC  would  not  be  expected 
to  coexist  with  carbon  except  at  the  oxygen  partial  pressure 
boundary  which  separates  the  NbC  and  C  containing  regions.  Since 
the  stability  diagram  does  not  illustrate  the  nonstoichiometric 
character  of  NbC,  the  boundary  between  NbC  and  C  may  actually  be 
a  region  of  nonstoichiometry  rather  than  a  distinct  line. 


CONCLUSIONS 


The  compositions  investigated  in  general  showed  a 
substantial  change  in  the  crystalline  phases  formed  between 
1250°C  and  13Q0°C.  Accompanying  this  change  was  the  development 
of  zircon  at  the  expense  of  the  zirconia  and  the  transformation 
of  cordierite  from  the^x^C  to  the  oC  form.  The  formation  of 
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zircon  coincided  with  the  formation  of  large  flaws  in  the  matrix 
material  which  greatly  degraded  the  material  strength. 

Metastable  ternary  isothermal  diagrams  at  1250°Cand  1300°£ 
were  constructed  for  the  compositions  used  in  this  study.  The 
resulting  diagram  should  be  extremely  useful  in  selecting  future 
compositions  for  study. 

Crystalline  phase  development  of  the  composite  samples  seemed 
to  lag  behind  that  of  the  matrix  material  without  the  SiC  fibers. 
The A^L  to <x  transformation  of  cordierite  and  the  formation  of 
zircon  were  two  examples  of  lagging  reactions.  An  isothermal 
section  for  the  composite  materials  was  estimated  based  on  the 
experimental  XRD  diffraction  data  and  is  shown  in  Figure  4. 

By  utilizing  available  thermochemical  data,  a  Nb-Si-O-C 
stability  diagram  was  calculated.  This  stability  diagram  is 
offered  as  an  aid  in  understanding  the  role  of  ^305  in  SiC  fiber 
composites . 


> 
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